Ako vytvoriť Visual Basic program pomocou if else

V programovacom svete " Ak Else " vyhlásenie je široko používaný , a to je dôležité si uvedomiť , jeho syntax na ladenie programov napísaných inými programátormi . " If ... Then ... Else " vyhlásenie testuje výraz a vyhodnotí ho na hodnotu true alebo false a potom spustí príkaz nasledovné : "Ak .. A " , či je to pravda , inak to vykoná príkaz nasledujúce " Else " . Príkaz je ukončený s " End If . " Okrem toho , " If ... Then ... Else " príkazy môžu byť vnorené do seba zúžiť riešenie zložitejšieho problému . Veci , ktoré budete potrebovať v Microsoft Visual Basic Express
Zobraziť ďalšie inštrukcie Cestuj 1

Spustite program Microsoft Visual Basic Express , kliknite na tlačidlo " Nový projekt ... " V ľavej table obrazovky počítača a potom dvakrát kliknite na " Windows Forms aplikácie " pre vytvorenie nového projektu .
2

Double - kliknite na tlačidlo " " na " Toolbox " panelu pridať nový tlačidlo ovládania . Double - kliknite na " Label " pridať nový štítok a double - kliknite na " textové pole " pridať nové textové pole . Dvakrát kliknite na formulár otvorte " Form1.vb " a zadajte nasledujúci kód pod " Form1_Load " pridať text na etikete : " . Zadajte číslo medzi 0 a 10 "

Me.Label1.Text =
3

kliknite na " Form1.vb [ design ] , " double - kliknite na " Button1 " pre otvorenie modulu kódu a zadajte pod postupu " Button1_Click " po vytvorení premenné :

Dim myNum As Integer
Stránka 4

Zadajte nasledujúce získať hodnotu z ovládacieho prvku textové pole :

myNum = Me.TextBox1.Text

5

Zadajte nasledujúci kód spustiť skupinu vnorených " If ... Then ... Else " vyhlásenie nájsť číslo zadané užívateľom :

Ak myNum > = 0 A myNum < = 10 A

Ak myNum > 5 A myNum < = 10 A

Ak myNum = 6 Potom

MsgBox ( " Zadali ste číslo 6 " )

ElseIf myNum = 7 Potom

MsgBox ( " Zadali ste číslo 7 " )

ElseIf myNum = 8 Potom

MsgBox ( " Zadali ste číslo 8 " )

ElseIf myNum = 9 Potom

MsgBox ( " Zadali ste číslo 9 " )

Else

MsgBox ( " Zadali ste číslo 10 " )

End If

Else

Ak myNum = 0 Then

MsgBox ( " Zadali ste číslo 0. " )

ElseIf myNum = 1 potom

MsgBox ( " Zadali ste číslo 1 " )

ElseIf myNum = 2 potom

MsgBox ( " Zadali ste číslo 2 " )

ElseIf myNum = 3 Potom

MsgBox ( " Zadali ste číslo 3 " )

ElseIf myNum = 4 Potom

MsgBox ( " Zadali ste číslo 4 " )

inak

MsgBox ( " Zadali ste číslo 5 " )

End If

End If

Else

MsgBox ( " Prosím , zadajte číslo medzi 0 a 10 " )

End If

Program umožní užívateľovi zistiť , či zadané číslo nie je v dosahu .
6

Stlačte " F5 " spustiť program a zadajte číslo medzi nulou a 10. Kliknite na " Button1 " spustiť kód a zobrazí číslo , ktoré ste zadali .

• Predchádzajúca strana: Ako môžem otvoriť formulár z iného formulára v jazyku Visual Basic 2005 ? 
• Ďalšia strana: Ako exportovať BMP GIF vo VB6