Percabangan

Kondisi Percabangan yakni suatu kondisi yang hanya dapat dikerjakan karena memenuhi kriteria.

If . . . End If
If . . . Else . . . End If
If . . . Else If . . . End If
If . . . Else If . . . Else . . . End If

Contoh satu kondisi

Dim Harta As Integer = 100.000
Dim Status As String = "Kaya"
                    If Harta  = 100.000 Then
                    Status     = "Kaya"
                     End If


Contoh dua kondisi

Dim Harta As Integer = 100.000
Dim Status As String = "Kaya"
                    If Harta   = 100.000 Then
                    Status      = "Kaya"
                    Else
                    Status      = "Belum Kaya''
                   End If


Contoh tiga kondisi

Dim Nilai As Integer
Dim Keterangan As String
If nilai               >= 70 then
Ket                      = "Lulus"
Else If Nilai       >= 50 Then
Ket                       = "Lulus Bersyarat"
Else If Nilai       <= 50 Then
Ket                       = "Tidak Lulus"
End If


Sekian dan semoga bermanfaat.