STRUKTUR KONTROL
IF .. THEN
IF .. THEN
MENGENAL STRUKTUR KONTROL
Struktur kontrol di dalam bahasa pemrograman adalah perintah dengan bentuk (struktur) tertentu yang digunakan untuk mengatur (mengontrol) jalannya program.
Visual Basic mengenal dua jenis struktur kontrol, yaitu :
1. Struktur kontrol keputusan - digunakan untuk memutuskan kode program mana yang akan dikerjakan berdasarkan suatu kondisi.
2. Struktur kontrol pengulangan - digunakan untuk melakukan pengulangan kode program.
Ada dua bentuk struktur kontrol keputusan, yaitu :
1. Struktur IF…THEN.
2. Struktur SELECT…CASE.
STRUKTUR IF .. THEN
IF ... THEN struktur seleksi yang digunakan untuk melakukan tindakan yang ditunjukkan, hanya jika kondisi ini benar, jika tidak tindakan diabaikan.
Bentuk penulisan (syntax) struktur IF…THEN :
IF <kondisi> THEN <kode program>
Bila <kondisi> bernilai True maka <kode program> akan dikerjakan.
CONTOH PROGRAM : STRUKTUR IF…THEN
Aktifkan VB melalui tombol Start.
Tambahkan Form baru ke dalam Project.
Pada Jendela Form buatlah seperti dibawah ini :
(Gunakan object Label, TextBox dan CommandButton)
Text
 |
Label
 |
Command button 1 Command Button 3
Command button 2
TABEL PROPETIES
| OBJECT | PROPERTIES | VALUE |
| Label | Name | Lblnilai |
| Caption | NILAI | |
| Text | Name | Txtnilai |
| Command Button | Name | Cmdok |
| Caption | OK | |
| Command Button | Name | Cmddelete |
| Caption | DELETE | |
| Command Button | Name | Cmdexit |
| Caption | EXIT |
CODING :
Private Sub Cmddelete_Click()
Txtnilai.Text = " "
End Sub
Private Sub Cmdexit_Click()
End
End Sub
Private Sub Cmdok_Click()
If Txtnilai >= 75 Then
A = MsgBox("SELAMAT ANDA LULUS")
End If
End Sub
HASIL KETIKA DI RUN
Ketika diisi dengan nilai, lalu klik OK dengan nilai >= 75
Ketika diisi dengan nilai yang < 75
Ketika meng-klik DELETE.
Ketika meng-klik Exit, akan kembali ke lembar kerja
Tidak ada komentar:
Posting Komentar