Pemrograman Visual (VB) P4 Materi Logika Percabangan IF cth3

Belajar kondisi dengan visual basic 6.0

Disini kita menggunakan if else then

If else then merupakan statement percabangan dalam visual basic. Statement bercabang digunakan untuk melakukan suatu tindakan dalam suatu program dalam kondisi tertentu.

percabangan if else then digunakan untuk menjalankan suatu perintah yang nilainya tergantung pada kondisi yang diuji. penulisannya seperti berikut :

If kondisi then
pernyataan 1
Else
pernyataan 2
End if

untuk kondisi bercabangan bertingkat bisa digunakan statement ElseIf, sehingga menjadi :

If kondisi 1 then
pernyataan 1
ElseIf kondisi 2 then
pernyataan 2
Else
pernyataan 3
End If

Untuk selanjutny kita langsung dengan soal:

jika seorang mahasiswa mendapatkan IP diatas 3 maka akan mendapatkan beasiswa dan jika tidak maka tidak mendapatkan beasiswa

untuk statemennya seperti dibawah ini :

if (ip>3) then

dapat beasiswa

else

tidak dapat beasiswa

selanjutnya adalah membuatnya kedalam visual basic

maka buka vb standar exe

buat form dengan tampilan UI-nya menjadi seperti ini :

Melalui Jendela Properties atur property setiap object sebagai berikut

Objek	Properties	value
Form1	Name	frmkondisi
	Caption	Latihan kondisi
Frame1	Nama	Frame1
	Caption	–
Label1	Name	Lbljudul
	Caption	Menentukan beasiswa
Label2	Name	Lblip
	Caption	IP
Lbl3	Name	Lblket
	Caption	Ket
Text1	Nama	Txtip
	Caption	–
Text2	Nama	Txtket
	Caption	–
Command1	Name	Cmdbeasiswa
	Caption	Beasiswa
Command2	Name	Cmdexit
	Caption	EXIT

Setelah from di atur sedemikian rupa klik view code

Tuliskan coding seperti dibawah ini

Private Sub Cmdbeasiswa_Click()Dim ip As Single ip = Val(txtip.Text) If (ip > 3) Then txtket.Text = ” Dapat Beasiswa” Else txtket.Text = “Tidak Dapat Beasiswa” End If End Sub Private Sub Cmdexit_Click() Unload Me End Sub

setelah selesai klik run atau bisa juga dengan menekan keyboard ctrl+f5

maka akan tampak hasilnya seperti gambar dibawah ini :