I programmeringen verden "hvis Else " erklæring er meget udbredt , og det er vigtigt at anerkende dens syntaks til at fejlsøge programmer skrevet af andre programmører. En " If ... Then ... Else " erklæring tester et udtryk og vurderer det til sandt eller falsk , og derefter udfører en erklæring efter "hvis .. Så ", hvis det er sandt ellers udfører erklæring efter " Else ". Erklæringen afsluttes med et " End If ". Desuden " If ... Then ... Else " udsagn kan indlejres i hinanden for at indsnævre løsning af en mere kompliceret problem. Ting du skal
Microsoft Visual Basic Express
Vis Flere Instruktioner
1
Start Microsoft Visual Basic Express , klik på " Nyt projekt ... " på den venstre rude på din computerskærm og dobbeltklik derefter på "Windows Forms Application " for at oprette et nyt projekt.
2
Dobbeltklik på " Button " på " Toolbox" ruden for at tilføje en ny knap kontrol. Dobbeltklik på " Label" for at tilføje en ny etiket og dobbeltklikke på " TextBox " for at tilføje en ny tekstboks. Dobbeltklik på formularen for at åbne " Form1.vb ", og skriv følgende kode nedenfor " Form1_Load " for at tilføje tekst til etiketten : Hej
Me.Label1.Text = " Indtast et tal mellem 0 og 10 ".
3
Klik på " Form1.vb [ Design ] " dobbelt -klik " Button1 " for at åbne koden modulet og skriv følgende under " Button1_Click " procedure for at oprette en variabel : < br >
Dim myNum As Integer
4
Skriv følgende for at få værdien fra tekstboks : Hej
myNum = Me.TextBox1.Text
< br > 5
Indtast følgende kode til at udføre en gruppe af indlejrede " If ... Then ... Else " erklæringer for at finde nummeret indtastet af brugeren : Hej p Hvis myNum > = 0 og myNum < = 10 Så
p Hvis myNum > 5 Og myNum < = 10 Så
p Hvis myNum = 6 Så
MsgBox ( " Du har indtastet nummer 6 " ) < br >
EllersHvis myNum = 7 Så
MsgBox ( " Du har indtastet nummer 7 " )
EllersHvis myNum = 8 Så
MsgBox ( " Du har indtastet nummer 8 " )
EllersHvis myNum = 9 Så
MsgBox ( " Du indtastede nummer 9")
Else
MsgBox ( " Du har indtastet nummer 10 " ) < br >
End If
Else
p Hvis myNum = 0 Then
MsgBox ( " Du indtastede nummer 0")
EllersHvis myNum = 1 Så
MsgBox ( " Du indtastede nummer 1")
EllersHvis myNum = 2 Så
MsgBox ( " Du indtastede nummer 2")
EllersHvis myNum = 3 Så
MsgBox ( " Du indtastede nummer 3")
EllersHvis myNum = 4 Så
MsgBox ( " Du har indtastet nummer 4")
Else
MsgBox ( " Du indtastede nummer 5")
End If
End If
Else
MsgBox ( "Indtast et tal mellem 0 og 10 ")
End If
programmet vil lade brugeren vide , om det indtastede nummer ikke er inden for rækkevidde .
6
Tryk på" F5 "for at køre programmet og skrive et tal mellem nul og 10. . Klik på " Button1 " for at udføre koden og vise det nummer, du har indtastet.