If <kondisi> Then
< Keputusan kondisi benar >
Else
< Keputusan kondisi salah >
End If
< Keputusan kondisi benar >
Else
< Keputusan kondisi salah >
End If
Penulisan percabangan seperti di atas disebut dengan “kondisi dan keputusan”. Dalam pengertian yang umum bisa dikatakan: Jika memenuhi kondisi maka lakukan proses keputusan untuk kondisi benar, jika tidak lakukan proses keputusan untuk kondisi salah.
Contoh 1:
“Jika bilangan habis dibagi dua maka bilangan itu adalah bilangan genap, jika tidak
bilangan itu adalah bilangan ganjil”, yang dituliskan dengan:
If bilangan mod 8 = 0 Then
Ket = "Bilangan genap"
Else
Ket = "Bilangan ganjil"
End If
“Jika bilangan habis dibagi dua maka bilangan itu adalah bilangan genap, jika tidak
bilangan itu adalah bilangan ganjil”, yang dituliskan dengan:
If bilangan mod 8 = 0 Then
Ket = "Bilangan genap"
Else
Ket = "Bilangan ganjil"
End If
Contoh 2:
“Jika peminjaman lebih dari 7 hari maka dikenakan denda sebesar 2000”, yang
dituliskan dengan
If peminjaman>8 Then
Denda = 2000
Else
Denda = 0
End if
Penulisan percabangan di dalam Visual Basic mempunyai beberapa format, antara lain:
(1) Jika kondisi dipenuhi maka dilakukan proses yang hanya satu baris perintah
If kondisi Then <Proses Kondisi Benar>
(2) Jika kondisi dipenuhi maka dilakukan proses yang lebih dari satu baris perintah
If kondisi Then
<Proses Kondisi Benar>
End If
(3) Jika kondisi dipenuhi maka dilakukan proses A, jika tidak dilakukan proses B
yang masing-masing hanya satu baris perintah
If kondisi Then <Proses A> Else <Proses B>
(4) Jika kondisi dipenuhi maka dilakukan proses A, jika tidak dilakukan proses B
yang masing-masing hanya satu baris perintah
If kondisi Then
<Proses A>
Else
<Proses B>
End If
“Jika peminjaman lebih dari 7 hari maka dikenakan denda sebesar 2000”, yang
dituliskan dengan
If peminjaman>8 Then
Denda = 2000
Else
Denda = 0
End if
Penulisan percabangan di dalam Visual Basic mempunyai beberapa format, antara lain:
(1) Jika kondisi dipenuhi maka dilakukan proses yang hanya satu baris perintah
If kondisi Then <Proses Kondisi Benar>
(2) Jika kondisi dipenuhi maka dilakukan proses yang lebih dari satu baris perintah
If kondisi Then
<Proses Kondisi Benar>
End If
(3) Jika kondisi dipenuhi maka dilakukan proses A, jika tidak dilakukan proses B
yang masing-masing hanya satu baris perintah
If kondisi Then <Proses A> Else <Proses B>
(4) Jika kondisi dipenuhi maka dilakukan proses A, jika tidak dilakukan proses B
yang masing-masing hanya satu baris perintah
If kondisi Then
<Proses A>
Else
<Proses B>
End If
Contoh 3:
“Jika nilai<60 maka tidak lulus, jika tidak lulus” dapat dituliskan dengan:
If Nilai<60 Then Ket="Lulus" Else Ket="Tidak Lulus"
Contoh 4:
“Jika pembelian > 50000 maka mendapat hadiah cangkir”, dapat dituliskan dengan:
If pembelian > 50000 Then Hadiah = "Cangkir"
“Jika nilai<60 maka tidak lulus, jika tidak lulus” dapat dituliskan dengan:
If Nilai<60 Then Ket="Lulus" Else Ket="Tidak Lulus"
Contoh 4:
“Jika pembelian > 50000 maka mendapat hadiah cangkir”, dapat dituliskan dengan:
If pembelian > 50000 Then Hadiah = "Cangkir"
F. Percabangan dengan If…Then…Else… Berantai
Percabangan tidak harus hanya memiliki satu kondisi, bisa juga percabangan memiliki banyak kondisi dengan banyak proses keputusan, hal ini sering dinamakan dengan percabangan berantai. Percabangan berantai secara umum ada dua macam yang dituliskan dengan:
(1) Jenis percabangan berantai dengan hanya satu kondisi yang bisa terpenuhi
If <kondisi1> Then
<Keputusan dalam kondisi1>
else
if <Kondisi2> Then
<Keputusan dalam kondisi2>
else
if <Kondisi3> Then
<Keputusan dalam kondisi3>
else
If <Kondisi4> Then
<Keputusan dalam kondisi 4>
else
--- Keputusan yang lain ---
end if
end if
end if
end if
(2) Jenis percabangan berantai dengan banyak kondisi yang harus dipenuhi.
If <kondisi1> Then
<Keputusan dalam kondisi1>
if <Kondisi2> Then
<Keputusan dalam kondisi2>
if <Kondisi3> Then
<Keputusan dalam kondisi1, kondisi2 dan kondisi 3>
Else
<Keputusan dalam kondisi1 dan kondisi2 tetapi
tidak dalam kondisi 3>
End If
End If
End If
(1) Jenis percabangan berantai dengan hanya satu kondisi yang bisa terpenuhi
If <kondisi1> Then
<Keputusan dalam kondisi1>
else
if <Kondisi2> Then
<Keputusan dalam kondisi2>
else
if <Kondisi3> Then
<Keputusan dalam kondisi3>
else
If <Kondisi4> Then
<Keputusan dalam kondisi 4>
else
--- Keputusan yang lain ---
end if
end if
end if
end if
(2) Jenis percabangan berantai dengan banyak kondisi yang harus dipenuhi.
If <kondisi1> Then
<Keputusan dalam kondisi1>
if <Kondisi2> Then
<Keputusan dalam kondisi2>
if <Kondisi3> Then
<Keputusan dalam kondisi1, kondisi2 dan kondisi 3>
Else
<Keputusan dalam kondisi1 dan kondisi2 tetapi
tidak dalam kondisi 3>
End If
End If
End If
+ komentar + 1 komentar
Artikel bagus nih..., Kunjungi juga
Mengenal Tag Kondisi If - Else - End IF | Belajar dan berbagi Tutorial Visual Basic
Thx
Posting Komentar