INSTITUT TEKNOLOGI &
BISNIS STIKOM AMBON
TAHUN AJARAN
2020/2021
Nama :
Intan Pristi Arifin
Devya Galib Lamira
Lussiana Luanmase
Kelas : C
Jurusan : Teknik Informatika
Dosen Pengampu : Nabila Opier
Pemograman Visual Basic 6.0
Materi Ke-4
Kondisi Dan Keputusan
1. Percabangan dengan If…Then…Else…
Percabangan berdasarkan kondisi suatu variabel atau nilai di dalam
pemrograman Visual Basic dinyatakan dengan perintah:
If <kondisi> Then
< 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
2. 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, kondisi 2 dan
kondisi 3>
Else
<Keputusan dalam kondisi1 dan kondisi2
tetapi tidak dalam kondisi
3>
End If
End If
End If
Contoh :
Menentukan nilai A,B,C,D,E dengan syarat
nilai A>80 sangat baik
nilai B>65 baik
nilai C>55 cukup
nilai D>40 kurang
nilai E<41, kurang sekali
dapat dituliskan dalam percabangan berantai sebagai berikut:
(1) Buat project baru , dengan membuka menu file pada menu toolbar ,tekan new project,atau
dengan menekan pada keyboard Ctrl+N
(2) Setelah itu akan muncul pilihan project ,pilih pada standar EXE
(3) Untuk form1, isikan property [Name] dengan nama kalian(optional) ,kalian dapat
mengubahnya pada properties pada bagian caption
(4) Tambahkan komponen-komponen: 3 label, 3 textbox dan 1 command button. Untuk
menambah komponen ,kalian bias lihat pada menu general
(5) Untuk label1, isi property [Caption] dengan “isi Nilai”. Untuk label2, isi property
[Caption] dengan “keterangan”. Dan untuk label3, isi property [Caption] dengan
“feedback”
(6) Untuk semua textbox, kosongkan property [Text]
(7) Untuk command1, isi property [Caption] dengan “Hitung”, dan atur posisi setiap
komponen seperti gambar berikut:
(8) Klik dua kali pada tombol command ,maka muncul tampilan untuk memasukan query
seperti gambar dibawah ini
(9) Masukan query berikut
nilai = Val(Text1)
Text2 = 0
Text3 = ""
If nilai < 41 Then
Text2 = "E"
Text3 = "Nilai Anda Kurang sekali ,Anda Tidak Lulus"
Else
If nilai < 56 Then
Text2 = "D"
Text3 = "Nilai Anda Kurang ,Anda Tidak Lulus"
Else
If nilai < 66 Then
Text2 = "C"
Text3 = "Nilai Anda Cukup ,Anda Lulus"
Else
If nilai < 81 Then
Text2 = "B"
Text3 = "Nilai Anda Baik ,Anda Lulus"
Else
Text2 = "A"
Text3 = "Nilai Anda Sangat Baik
,Anda Lulus"
End If
End If
End If
End If
(10) Lalu tekan tombol run untuk melihat hasilnya,tombol run berada
di menu tollbar
(11) Dan ini hasilnya
Tidak ada komentar:
Posting Komentar