Kui Siis struktuur

Kui avaldus on kasutatud, et otsustada, milliseid meetmeid võtta kahe võimalusi. Struktuur on järgmine:

Siis kui <comprabación lógica>
[Sammud, mis tuleb teha kui tingimus]
Teine
[Sammud, mis tuleb läbi viia ilma tingimus ei ole täidetud]
End Kui

Järgnevas näites me eeldame, et me möödunud isiku vanus on muutuv uudsuse ja me aru, kui see inimene on täiskasvanud (21 aastat).

 Kui Vedad> = 21 Siis
 MsgBox ("See on kasvanud üles")
 Teine
 MsgBox ("See on väike")
 End Kui

väärtuse omistamisel muutuja saab kasutada IIF avaldust, mis on kirjutatud 1 rida:

IIf (<Checking lógica>, Action, kui tõsi, tegevus, kui ei ole rahul)

arvan, et ma olla tekstikasti nimega txtCantidad kus ma võtan numbriline väärtus ning määras selle täisarv muutuja nimega vCantidad, kuid kui tekstikasti on tühi jaotus ei õnnestu, siis saame lahendada koos IIF.

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

Saame kasutada ka Pesastatud kui on ja seega murda barjääri nende kahe võimaluse vahel otsustada. Oletame, et me peame kasutama semáfono (punane, kollane või roheline) rõhutada nõuetele vastavuse tase. Valikud on 3 1 kui 1 võimaldab 2 (true või false) kasutades Pesastatud kui tema saab tegeleda selle ja paljude teiste probleemidega.

 "Meil on vorm (Form1) koos
 "Tekstikasti (textbox1), mis sisaldab
 "Väärtus esindab protsenti
 "Vastavus

 "Kui see on suurem või võrdne 100 värv on roheline
 "Kui vahel 80 ja 100 värv on kollane
 "Ja kui alla 80 on punane

 Kui TextBox1.Text> = 100 Siis
 TextBox1.BackColor = Color.green
 Teine
 Kui TextBox1.Text> = 80 Siis
 TextBox1.BackColor = Color.red
 Teine
 TextBox1.BackColor = Color.Red
 End Kui
 End Kui

saame kasutada elseif nagu allpool näidatud

 Kui TextBox1.Text> = 100 Siis
 TextBox1.BackColor = Color.green
 ElseIf TextBox1.Text> = 80 Siis
 TextBox1.BackColor = Color.red
 Teine
 TextBox1.BackColor = Color.Red
 End Kui