I programplaneringen världen " Om Else " är uttalandet i stor utsträckning och det är viktigt att erkänna dess syntax för att felsöka program skrivna av andra programmerare . En " If ... Then ... Else " uttalande testar ett uttryck och utvärderar den till sant eller falskt och sedan kör ett uttalande efter " Om .. Sen " om det är sant annars exekverar uttrycket efter " Else . " Uttalandet avslutas med en " End If . " Dessutom , " If ... Then ... Else " kan uttalanden vara inkapslade i varandra för att begränsa lösningen av ett mer komplicerat problem . Saker du behöver
Microsoft Visual Basic Express
Visa fler instruktioner
1
Starta Microsoft Visual Basic Express , klicka på " Nytt projekt ... " På den vänstra rutan på din datorskärm och dubbelklicka sedan på " Windows Forms Application " för att skapa ett nytt projekt .
2
Dubbelklicka på " knappen " på " Toolbox " rutan för att lägga till en ny knapp kontroll . Dubbelklicka på " Label " för att lägga till en ny etikett och dubbelklicka på " TextBox " för att lägga till en ny textruta . Dubbelklicka på formuläret för att öppna " Form1.vb " och skriv in följande kod under " Form1_Load " för att lägga till text till etiketten :
Me.Label1.Text = " Ange ett tal mellan 0 och 10 . " Addera 3
Klicka på " Form1.vb [ Design ] , " dubbel - klicka " Button1 " för att öppna koden modul och skriv följande under " Button1_Click " förfarande för att skapa en variabel :
Dim myNum As Integer
4
Skriv följande för att få värdet från textrutan kontroll :
myNum = Me.TextBox1.Text
5
Skriv in följande kod för att exekvera en grupp av kapslade " If ... Then ... Else " uttalanden för att hitta numret som anges av användaren :
p Om myNum > = 0 Och myNum < = 10 Sedan
p Om myNum > 5 Och myNum < = 10 Sedan
p Om myNum = 6 Då
MsgBox ( " Du har angett nummer 6 " )
ElseIf myNum = 7 Då
MsgBox ( " Du har angett nummer 7 " ) katalog
ElseIf myNum = 8 Sedan
MsgBox ( " Du har angett nummer 8 " ) katalog
ElseIf myNum = 9 Då
MsgBox ( " Du har angett nummer 9 " ) katalog
Else
MsgBox ( " Du har angett nummer 10 " )
End If
Else
p Om myNum = 0 Then
MsgBox ( " Du angav siffran 0 " ) katalog
ElseIf myNum = 1 sedan
MsgBox ( " Du har angett nummer 1 " ) katalog
ElseIf myNum = 2 Därefter
MsgBox ( " Du har angett nummer 2 " ) katalog
ElseIf myNum = 3 Sen
MsgBox ( " Du har angett nummer 3 " ) katalog
ElseIf myNum = 4 Då
MsgBox ( " Du har angett nummer 4 " ) katalog
Else
MsgBox ( " Du har angett nummer 5 " ) katalog
End If
End If
Else
MsgBox ( " Ange ett tal mellan 0 och 10 " ) katalog
End If
programmet låter användaren veta om antalet deltagare inte är inom räckhåll .
6
Tryck " F5 " för att köra programmet och skriv ett nummer mellan noll och 10 . Klicka " Button1 " för att köra koden och visa numret du angett .