Fungsi IF..THEN...ELSEIF...ELSE

Fungsi IF..THEN...ELSEIF...ELSE merupakan suatu fungsi untuk pengambilan suatu keputusan,
contoh :
If <Kondisi 1> Then 
<Keputusan 1>
ElseIf  <Kondisi 2> Then 
<Keputusan 2>
Else <Kondisi 3> Then
<Keputusan 3>
End If

• Percobaan

Buatlah 1 CommandButton dengan nama Command1 Dan 2 buah Texbox dengan nama masing-masing Text1 dan Text2.

sehingga menjadi seperti ini

tulis kode berikut ini pada command1_Click
If IsNumeric(Text1.Text) = False Then
    Text2.Text = "Bukan Bilangan"
ElseIf Val(Text1.Text) Mod 2 = 0 Then
    Text2.Text = "Bilangan Genap"
Else
    Text2.Text = "Bilangan Ganjil"
End If

Jalankan Aplikasi nya dengan menekan tombol F5 dan coba masukan nilai apa saja pada text1 lalu coba klik tombol cek.

Download project nya disini