PERTEMUAN VI

PERTEMUAN VI

Penggunaan

Struktur Kontrol IF

TUJUAN

bull Mengenal Struktur Kontrol

bull Contoh Program Struktur IFhellipTHEN

Mengenal Struktur KontrolStruktur kontrol di dalam bahasa pemrograman adalah perintah dengan bentuk (struktur) tertentu yang digunakan untuk mengatur (mengontrol) jalannya programVisual Basic 6 mengenal dua jenis struktur kontrol yaitu 1 Struktur kontrol keputusan - digunakan untuk memutuskan kode program mana yang akandikerjakan berdasarkan suatu kondisi Akan dibahas pada bab ini2 Struktur kontrol pengulangan - digunakan untuk melakukan pengulangan kode program Akan dibahas pada bab selanjutnya

Mengenal Struktur KontrolAda dua bentuk struktur kontrol keputusan yaitu 1 Struktur IFhellipTHEN Akan dibahas pada bab ini2 Struktur SELECThellipCASEBentuk penulisan (syntax) struktur IFhellipTHEN 1 IF ltkondisigt THEN ltkode programgtBila ltkondisigt bernilai True maka ltkode programgt akan dikerjakan2 IF ltkondisigt THENltblok kode program 1gtELSEltblok kode program 2gtEND IFBila ltkondisigt bernilai True maka ltblok kode program 1gt akan dikerjakan tetapi bila ltkondisigt bernilai False maka ltblok kode program 2gt yang akan dikerjakan

Contoh Program Struktur IFhellipTHEN

Aktifkan VB 6 melalui tombol StartBuka kembali project LatihanvbpTambahkan Form baru ke dalam ProjectPada Jendela Form buatlah UI seperti ini (Gunakan komponen Image Label TextBox dan CommandButton)



Buka Jendela Code dan pada bagian Code Editor ketikkan kode programnya sebagai berikut Private Sub Command1_Click()If Text1Text = nusantara Then Image1Visible = TrueEnd SubSimpan Form5 (nama file Lat5frm)Catatan Anda bisa men-download file Lat5frm dan KomputerwmfKlik menu Project gt Project1 Properties lalu klik tab General Gantilah Startup Object-nya menjadiForm5



Contoh Program Struktur IFhellipTHENCoba jalankan Project1 bull Ketikkan sembarang teks pada TextBox lalu klik tombol OK atau tekan Enter 1048774 tidak terjadi apa apabull Ketikkan ldquonusantarardquo pada TextBox lalu klik tombol OK atau tekan Enter 1048774 gambar komputer akan muncul


Modifikasi kode programnya menjadi sebagai berikut Private Sub Command1_Click()If Text1Text = nusantara ThenImage1Visible = TrueText1Enabled = FalseCommand1Enabled = FalseElseMsgBox Passwordnya Salah kondisi kode program yang dikerjakanbila kondisi TRUEText1Text = Text1SetFocusEnd IfEnd Sub


Coba jalankan Project1 bullKetikkan sembarang teks pada TextBox lalu klik tombol OK atau tekan Enter 1048774 muncul kotak pesan ldquoPasswordnya Salah rdquo Klik tombol OK pada kotak pesan tersebutbullKetikkan ldquonusantarardquo pada TextBox lalu klik tombol OK atau tekan Enter 1048774 gambar komputer akan muncul TextBox dan tombol OK menjadi disable (tidak bisan digunakan)



Catatan tambahan Teks ldquonusantarardquo harus diketik huruf kecil semua Ingat data string bersifat case sensitive Agar password-nya tidak bersifat case sensitive modifikasi pernyataan kondisinya menjadi If LCase(Text1Text) = nusantara ThenFungsi LCase adalah untuk mengkonversi semua string yang diinput ke Text1Text menjadi hurufkecil walaupun user menginputnya dengan huruf kapital


TANTANGAN Coba Anda modifikasi struktur kontrol dan kode programnya sehingga seorang user hanya mempunyai3 kali kesempatan untuk mengetikkan password-nya Setelah 3 kali kesempatan dan password-nya masihsalah maka program akan otomatis berhenti

PERTEMUAN VI

TUJUAN

Mengenal Struktur Kontrol



Slide 6

Slide 7

Slide 8

Slide 9

Slide 10

Slide 11

Slide 12

Slide 13

Slide 14

TUJUAN

bull Mengenal Struktur Kontrol

bull Contoh Program Struktur IFhellipTHEN




















PERTEMUAN VI

TUJUAN




Slide 6

Slide 7

Slide 8

Slide 9

Slide 10

Slide 11

Slide 12

Slide 13

Slide 14




















PERTEMUAN VI

TUJUAN




Slide 6

Slide 7

Slide 8

Slide 9

Slide 10

Slide 11

Slide 12

Slide 13

Slide 14

PERTEMUAN VI

Documents

Transcript of PERTEMUAN VI