Pada beberapa kasus terkadang kita menginginkan komputer melakukan suatu pernyataan tertentu bila suatu kondisi terpenuhi. Dalam Visual BASIC perintah percabangan/pemilihan keputusan dapat dilakukan dengan statemen If...Then dan Select Case.
1. Statemen If...Then
Statemen ini digunakan untuk melakukan aksi setelah melakukan pengujian terhadap suatu kondisi. Pernyataan dalam blok statemen hanya akan dilaksanakan ketika kondisi pengetesan/pengujian bernilai benar. Statement If...Then memiliki beberapa sintaks/cara penulisan sesuai dengan jumlah pernyataan yang akan dieksekusi.
If...Then dengan Kondisi dan Pernyataan Tunggal
If <kondisi> Then <Pernyataan>
Contoh :
If <kondisi> Then <Pernyataan>
Contoh :
- If Nilai >= 60 Then Keterangan = “Lulus”
- If...Then dengan Pernyataan Jamak
If <Kondisi> Then
<Pernyataan_1>
<Pernyataan_2>
.
.
<Pernyataan_n>
End If
Contoh :
If Nilai >= 60 Then
Keterangan = “Lulus”
Ucapan = “Selamat”
End If - If...Then dengan 2 kondisi.
If <Kondisi> Then
<Pernyataan_Jika_Kondisi_Benar>
Else
<Pernyataan_Jika_Kondisi_Salah>
End If
Contoh:
If Nilai >= 60 Then
Keterangan = “Lulus”
Ucapan = “Selamat”
Else
Keterangan = “Tidak Lulus”
Ucapan = “Jangan Bersedih”
End If- d. If...Then dengan kondisi jamak.
If <Kondisi_1> Then
<Pernyataan>
ElseIf <Kondisi_2> Then
<Pernyataan>
...
ElseIf <Kondisi_n> Then
<Pernyataan>
Else
<Pernyataan>
End If
Contoh:
If Nilai >= 85 Then
Keterangan = “Lulus, Sangat Memuaskan”
ElseIf Nilai >= 70 Then
Keterangan = “Lulus, Memuaskan”
ElseIf Nilai >=60 Then
Keterangan = “Lulus, Cukup Memuaskan”
Else
Keterangan = “Tidak Lulus, Silahkan Mengulang”
end if
Sama halnya seperti statemen If...Then, Select Case juga mengerjakan suatu blok statemen berdasarkan uji nilai ekspresi. Perbedaannya adalah pada tata cara penulisan dan pengelompokan nilai dari variabel/kondisi.
Sintaks :
Select Case <Variabel penguji>
Case <Nilai_1>
<Pernyataan_1>
Case <Nilai_2>
<Pernyataan_2>
Case Else
<Pernyataan_n>
End Select
Contoh:
Select Case Nilai
Case “A”
Keterangan = “Sangat Memuaskan”
Case “B”
Keterangan = “Memuaskan”
Case “C”
Keterangan = “Cukup”
Case Else
Keterangan = “Kurang”
End Select
- d. If...Then dengan kondisi jamak.
Tidak ada komentar:
Posting Komentar