Contoh if else vb 6.0

Mungkin sudah banyak yang mengetahui tentang perintah if else,if else adalah perintah percabangan untuk menguji sebuah kondisi dimana, jika kondisi 1 terpenuhi maka maka program akan menjalankan kodisi tersebut. dan jika kondisi tersebut tidak terpenuhi maka program akan menjalankan kondisi lainnya.
Untuk contoh program vb 6.0 dan cara kerjanya saya akan mencoba membuat perintah sederhana sebagai berikut :
Buatlah form seperti berikut

Buat ketentuan formnya sebagai berikut

Object	Name	Caption
labl1	label1	isikan nilai
text1	Tnilai	(kosongkan)
command1	CView	View
Command2	Cexit	exit

Ketikan kode perintah sebagai berikut
Private Sub Cexit_Click()
PESAN = MsgBox("Keluar Aplikasi??", vbQuestion + vbYesNo, "Keluarrrr")
If PESAN = vbYes Then
End
End If
End Sub

Private Sub Cview_Click()
If Tnilai.Text >= 6 Then
MsgBox "Selamat Anda LULUS"
Else
MsgBox "ANDA GAGAL"
End If
End Sub

Maka hasilnya akan seperti berikut :
Jika memasukan angka 6 atau lebih maka akan akan muncul "Selamat Anda LULUS"

Jika memasukan angka angka kurang dari dari 6 maka akan muncul "Anda GAGAl"

Dan jika menekan tombol exit makan akan muncul pesan

Itulah contoh if.. else yang bisa saya bagikan semoga bermanfaat..

Sobat suka tulisan ini..?