Jei Tada struktūra

If nuspręsti, kokių veiksmų imtis tarp dviejų galimų variantų. Struktūra yra tokia:

Tada, jei <comprabación lógica>
[Veiksmai turi būti atlikti, jei sąlyga]
Kitas
[Veiksmai turi būti vykdomos be sąlyga neišpildyta]
End If

Kitame pavyzdyje mes manome, kad priėmė kintamojo naujumo asmens amžių ir mums pranešti, jei šis asmuo yra pilnametis (21 metų).

 Jei Vedad> = 21 Tada
 MsgBox ("manimi išaugo-iki")
 Kitas
 MsgBox ("Tai yra nepilnametis")
 End If

priskyrimo kintamojo reikšmes, galite naudoti IIF raštišką pareiškimą, kuris yra vienoje eilutėje:

IIf (<Checking lógica>, veiksmus, jei tiesa, veiksmų, jei netenkina)

tarkime, Turiu laukelį, pavadintą txtCantidad, kur aš tam tikrą skaitmeninę vertę ir jam paskirtas kintamąjį vadinamą vCantidad,, bet jei laukelyje yra tuščias paskirstymas žlugs, tada mes galime išspręsti su IIF.

 Integer Dim vCantidad -
 vCantidad = IIf (txtCantidad.Text = String.Empty, 0, txtCantidad.Text)

Mes taip pat galime naudoti įdėtos, jei tai ir taip nutraukti iš dviejų variantų, turi nuspręsti barjerą. Tarkime, mes turime naudoti semáfono (raudona, geltona ar žalia) pabrėžti atitikties lygį. Galimybės yra 3, jei vienas leidžia du (true arba false) naudojant įdėtos IF gali išspręsti šią problemą ir daugelį kitų problemų.

 "Mes turime forma (Form1) su
 "Teksto lauką (textbox1), kuriame yra
 Vertė sudaro procentą
 "Laikymasis

 "Jei jis yra didesnis nei arba lygus 100, spalva - žalia
 "Jei tarp 80 ir 100 spalva yra geltona
 "Ir jei žemiau 80 yra raudonas

 Jei TextBox1.Text> = 100 Tada
 TextBox1.BackColor = Color.green
 Kitas
 Jei TextBox1.Text> = 80 Tada
 TextBox1.BackColor = Color.Yellow
 Kitas
 TextBox1.BackColor = Color.Red
 End If
 End If

mes galime naudoti elseif, kaip parodyta žemiau

 Jei TextBox1.Text> = 100 Tada
 TextBox1.BackColor = Color.green
 ElseIf TextBox1.Text> = 80 Tada
 TextBox1.BackColor = Color.Yellow
 Kitas
 TextBox1.BackColor = Color.Red
 End If