I programmering verden på " Hvis Else " statement er mye brukt , og det er viktig å anerkjenne dens syntaks å feilsøke programmer skrevet av andre programmerere . En " If ... Then ... Else " statement tester et uttrykk som evalueres til sann eller usann og deretter utfører en uttalelse følgende " If .. Så " hvis det er sant ellers utfører setningen som følger " Else ". Uttalelsen avsluttes med en " End If. " I tillegg, " If ... Then ... Else " uttalelser kan være nestet i hverandre for å innskrenke løsning av et mer komplisert problem . Du trenger
Microsoft Visual Basic Express
Vis flere instruksjoner
en
start Microsoft Visual Basic Express , klikker du "New Project ... " på den venstre ruten på skjermen og deretter dobbeltklikk på " Windows Forms Application " for å opprette et nytt prosjekt .
2
Dobbeltklikk på " Button" på " Toolbox" -ruten for å legge til en ny knapp kontroll. Dobbeltklikk på " Label" for å legge til en ny etikett og dobbeltklikk på " TextBox " for å legge en ny tekstboks . Dobbeltklikk Skjema for å åpne " Form1.vb " og skriv inn følgende kode under " Form1_Load " for å legge til tekst på etiketten : en
Me.Label1.Text = " Angi et tall mellom 0 og 10 år. "
3
Klikk " Form1.vb [Design ] , " dobbel -klikk " Button1 " for å åpne koden modulen og skriv inn følgende under " button1_click " prosedyre for å opprette en variabel :
Dim myNum As Integer
4
Skriv inn følgende for å få verdien fra tekstboksen kontroll : en
myNum = Me.TextBox1.Text
5
Skriv inn følgende kode for å utføre en gruppe av nestes " If ... Then ... Else " utsagn for å finne nummeret som oppgis av brukeren : en p Hvis myNum > = 0 Og myNum < = 10 Da
p Hvis myNum > 5 Og myNum < = 10 Da
p Hvis myNum = 6 Da
MsgBox ( "Du skrev nummer 6 ")
ElseIf myNum = 7 Da
MsgBox ( "Du skrev nummer 7 ")
ElseIf myNum = 8 Da
MsgBox ( "Du skrev nummer 8 " )
ElseIf myNum = 9 Så
MsgBox ( "Du skrev nummer 9 ")
Else
MsgBox ( "Du skrev nummer 10 ")
End If
Else
p Hvis myNum = 0 Then
MsgBox ( "Du skrev nummer 0 ")
ElseIf myNum = 1 deretter
MsgBox ( "Du skrev nummer 1" )
ElseIf myNum = 2 så
MsgBox ( "Du skrev nummer 2 ")
ElseIf myNum = 3 Så
MsgBox ( "Du skrev nummer 3 ")
ElseIf myNum = 4 Da
MsgBox ( "Du skrev nummer 4 ")
Else
MsgBox ( "Du skrev nummer 5 ")
End If
End If
Else
MsgBox ( "Vennligst oppgi et tall mellom 0 og 10 ")
End If
programmet vil la brukeren vet om det angitte nummeret ikke er innen rekkevidde .
6
Trykk" F5 "for å kjøre programmet og skriv inn et tall mellom null og ti . Klikk " Button1 " for å utføre koden og vise nummeret du tastet inn.