Posted by : Unknown
Rabu, 13 Juni 2018
Struktur Keputusan
Struktur keputusan adalah struktur program yang melakukan proses pengujian
untuk mengambil suatu keputusan apakah suatu baris atau blok instruksi akan
diproses atau tidak. Pengujian kondisi ini dilakukan untuk memilih salah satu
dari beberapa alternatif yang tersedia.
IF … THEN … ELSE STATEMENT
A. Pengambilan Keputusan Antara 2 (Dua) Pilihan
Bentuk Penulisan:
If [Ekspresi
Logika] Then
[Statement 1]
Else
[Statement 2]
End if
Struktur keputusan
ini akan menguji Ekspresi Logika (kondisi) yang ditentukan, jika kondisi
bernilai True (benar) maka Statement1
akan diproses, tetapi jika kondisi bernilai False (Salah)
maka Statement2 yang akan
diproses.
Ekspresi
Logika adalah suatu kondisi yang akan diuji. Untuk menetapkan
nilai yang akan diuji pada suatu kondisi harus menggunakan Operator Relasi, yaitu :
< : lebih kecil
<= : lebih kecil atau sama dengan
= : sama dengan
<> : tidak sama dengan
> : lebih besar
>= : lebih besar atau sama dengan
Contoh Program:
1.
Desain Program
2. Alur
Program
- Input Nilai
- Klik Proses, maka akan tampil keterangan “LULUS”
atau “GAGAL” pada Hasil.
Pengujiannya
sebagai berikut:
Jika Nilai
75 keatas maka “LULUS”
Jika Nilai
dibawah 75 maka “GAGAL”
3. Kode Program
Kode program
diketik pada Objek Button1 (Proses) sbb: Private Sub
BtnProses_Click(ByVal sender As System.Object,…
If TxtNilai.Text >= 75
TxtHasil.Text
= "LULUS"
Else
TxtHasil.Text
= "GAGAL"
End If
End Sub
B. Pengambilan Keputusan Dari Banyak Pilihan (Lebih dari 2 Pilihan)
Bentuk Penulisan:
If [Ekspresi
Logika1] Then
[Statement1]
ElseIf [Ekspresi Logika2] Then
[Statement2]
ElseIf [Ekspresi Logika3] Then
[Statement3]
...
Else
[Statement n]
End if
Struktur keputusan
ini akan menguji Ekspresi Logika (kondisi) yang ditentukan, jika Ekspresi
Logika1 bernilai True (benar) maka Statement1 akan diproses, tetapi jika kondisinya
bernilai False (Salah) maka Ekspresi Logika2 akan diuji. Jika Ekspresi
Logika2 bernilai True maka Statement2 akan diproses, tetapi jika
kondisinya bernilai False maka Ekspresi Logika3 akan diuji. Jika Ekspresi
Logika3 bernilai True maka Statement3 akan diproses, tetapi jika
kondisinya bernilai False maka Statement n yang akan diproses.
Contoh 2:
1. Menggunakan Program pada Contoh1, tetapi Alur
Program diubah sebagai berikut:
- Input Nilai
- Klik Proses, maka akan tampil keterangan
“LULUS” / “DAFTAR PENGGANTI” / “GAGAL” pada hasil.
Pengujiannya
sebagai berikut:
Jika Nilai 85
keatas maka “LULUS”
Jika Nilai 75
- 84 maka “DAFTAR PENGGANTI”
Jika Nilai
dibawah 75 maka “GAGAL”
2. Kode Program
Kode program
diketik pada Objek Button1 (Proses) sbb:
Private Sub BtnProses_Click(ByVal
sender As System.Object,…
If TxtNilai.Text >= 85 Then
TxtHasil.Text
= "LULUS"
Else TxtNilai.Text
>= 75 Then
TxtHasil.Text
= "DAFTAR PENGGANTI"
Else
TxtHasil.Text
= "GAGAL"
End If
End Sub
Contoh 3:
Penggunaan Objek ComboBox
Objek ComboBox digunakan untuk membuat daftar pilihan.
Untuk memasukkan daftar pilihan ada 2 cara:
(1) menggunakan properties yaitu items
Klik
properties items, kemudian ketik daftar pilihan.
(2) menggunakan
kode program
BP. :
NamaObjekComboBox.Items.Add(“Daftar
Pilihan“)
. Desain Program sbb:
2. Alur
Program
-
Pilih (klik) salah satu Kode Barang pada objek ComboBox, maka akan
tampil Nama Barang dan Harga Barang.
Tabel Pengujiannya sebagai berikut:
3. Kode
Program
Perintah diketik
pada Objek ComboBox.
Private Sub
CboKb_SelectedIndexChanged(ByVal sender As…
If Cbokb.Text = "PL01"
Then
TxtNB.Text
= "PULPEN PILOT"
TxtHB.Text
= 1200
Else
TxtNB.Text
= "BUKU SINAR DUNIA 50 LBR"
TxtHB.Text
= 3000
End If
End Sub