521

Intrebare in Visual Basic

Private Sub prelucrare()If cont = 3 Then If ((Label1.Caption = Label2.Caption) And (Label1.Caption = Label3.Caption)) Then suma = suma + 1000 ElseIf Label1.Caption = Label2.Caption Then suma = suma + 100 ElseIf Label1.Caption = Label3.Caption Then suma = suma + 100 ElseIf Label2.Caption = Label3.Caption Then suma = suma + 100 Else suma = suma - 100 End IfLabel4.Caption = "CREDIT: " & sumaCommand1.Caption = "PORNESTE!"flag = FalseEnd IfEnd SubAm asa o procedura! Si imi da eroare (scrie:END IF WITHOUT BLOCK IF)...cine stie care e eroare? Parca am scris toate if-urile cum trebu...da cinestie...ca abia incep cu basic-ul...Gata...imi cer scuze... pur si simplu n-am stiut ca in Basic ii important sa scris THEN si apoi din rind nou sa scrii instructiunile care trebuiesc executate!
0