Struktur Kontrol Struktur kontrol adalah sebuah proses untuk melakukan pencabangan alur program berdasarkan pada sebuah kondisi tertentu. Kondisi tersebut mengandung dua buah nilai yaitu True atau False. Struktur kontrol pada PowerBuilder menggunakan perintah IF. Berikut struktur penulisan statement IF: Sintak 1 IF
Then aksi-1 [ELSE aksi-2] End If Sintak 2 IF Then aksi-1 [ELSEIF Then aksi-2] . . . [Else Aksi-3] End If Kondisi adalah suatu proses perbandingan nilai-nilai data yang dihubungkan dengan operator Relasi, operator logika Operator relasi sebagai berikut Operator = > < <> >= <=
Arti Sama dengan Lebih besar Lebih kecil Tidak sama dengan Lebih besar sama dengan Lebih kecil sama dengan
Contoh if Price=100 then Rate=.05 if Price>100 then Rate=.05 if Price<100 then Rate=.05 if Price<>100 then Rate=.05 if Price>=100 then Rate=.05 if Price<=100 then Rate=.05
Arti Not (Kebalikan) AND OR
Contoh if NOT Price=100 then Rate=.05 if Tax>3 AND Ship <5 then Rate=.05 if Tax>3 OR Ship<5 then Rate=.05
Operator Logika Operator NOT AND OR
Komponen berkaitan dengan Struktur Kontrol
Komponen radioButton Komponen radiobutton digunakan untuk melakukan pemilihan data dari sejumlah pilihan dan harus dipilih salah satu dari pilihan tersebut. Komponen ini cocok untuk data seperti data jenis kelamin dimana harus dipilih antara pilihan laki-laki atau pilihan perempuan Beberapa properti penting yang harus diperhatikan dalam komponen RadioButton Properti Arti Name Nama yang harus diberikan untuk komponen ini, biasanya menggunakan prefix rb_ untuk memberikan namanya Text Keterangan yang akan berikan untuk komponen radiobutton ini Checked Akan bernilai true atau false, bernilai true ditandai dengan tanda hitam di tengah lingkaran dan bernilai false jika tidak ada tandah hitam dalam lingkaran. Properti Checked ini digunakan untuk mengetahui apakah komponen ini dipilih (di klik) atau tidak LeftText Menempatkan text di sebelah kiri dari bulatan , default posisinya berada di sebelah kanan dari bulatan RigthToLeft Tulisan Text akan berada disebelah kiri dari bulatan
ArsysSolution/Abdrohim/PowerBuilder/02
website : http://www.arsys.or.id, mailto : [email protected]
1/5
Komponen CheckBox Komponen CheckBox digunakan untuk melakukan pemilihan data dari sejumlah pilihan dan dibolehkan untuk memilih salah satu, beberapa pilihan, semua pilihan bahkan bisa tidak dipilih salah satu pun dari pilihan tersebut. Contoh data yang cocok adalah data pengambilan matakuliah dalam satu semester, bisa mengambil satu matakuliah, dua matakuliah atau delapan matakuliah bahakan bisa menganbil nol matakuliah jika diinginkan untuk melakukan cuti. Beberapa properti penting yang harus diperhatikan dalam komponen RadioButton Properti Arti Name Nama yang harus diberikan untuk komponen ini, biasanya menggunakan prefix cb_ untuk memberikan namanya Text Keterangan yang akan berikan untuk komponen checkbox ini Checked Akan bernilai true atau false, bernilai true ditandai dengan tanda hitam di tengah kotak kecil dan bernilai false jika tidak ada tanda hitam dalam kotak hitam. Properti Checked ini digunakan untuk mengetahui apakah komponen ini dipilih (di klik) atau tidak LeftText Menempatkan text di sebelah kiri dari bulatan , default posisinya berada di sebelah kanan dari bulatan RigthToLeft Tulisan Text akan berada disebelah kiri dari bulatan Latihan 1 1. Buka Workspace baru. Berikan nama ws3 2. Buka target baru dengan NewApplication, berikan nama lat3 3. Buka window baru 4. Aktifkan window tersebut kemudian bentuk form seperti gambar berikut: Pada window tersebut terdapat 2 buah StaticText, 2 buah SingleLineEdit, 2 buah RadioButton dan 1 buah CommandButton
5. 6.
7.
8. 9.
Aktifkan window properti dengan mengklik kanan pada window kemudian pilih Properties Isikan pada nilai nilai properti sebagai berikut: No. Objek Properti Nilai 1 Window Title Say Hallo 2 St_1 Text Nama 3 Sle_1 Name Sle_Nama Text (Kosongkan) 4 St_2 Text Jenis kelamin 5 Rb_1 Name Rb_laki Text Laki-Laki 6 Rb_2 Name Rb_perempuan Text Perempuan 7 Cb_1 Name Cb_Proses Text &proses 8 Sle_2 Name Sle_hasil text (Kosongkan) double klik pada button cb_proses, tuliskan script program berikut ini if rb_laki.checked then sle_hasil.text = 'Hallo '+sle_nama.text+’ anda ganteng sekali hari ini’ else sle_hasil.text = 'Hallo '+sle_nama.text+’ anda cantik sekali hari ini’ end if simpan Window, berikan nama w_lat3 Double klik pada Application Target lat3 , tuliskan perintah berikut ini:
ArsysSolution/Abdrohim/PowerBuilder/02
website : http://www.arsys.or.id, mailto : [email protected]
2/5
open(w_lat3) 10. simpan kembali program 11. Jalankan program tersebut Latihan 2 1. Buka target baru dengan NewApplication, berikan nama lat4 2. Buka window baru 3. Aktifkan window tersebut kemudian bentuk form seperti gambar berikut: Pada window tersebut terdapat 2 buah StaticText, 2 buah SingleLineEdit, 3 buah RadioButton dan 1 buah CommandButton
4. 5.
6. 7.
8.
9.
10. 11. 12. 13.
Aktifkan window properti dengan mengklik kanan pada window kemudian pilih Properties Isikan pada nilai nilai properti sebagai berikut: No. Objek Properti Nilai 1 Window Title Entry Anak 2 St_1 Text Nama 3 Sle_1 Name Sle_Nama Text (Kosongkan) 4 St_2 Text Status Nikah 5 Rb_1 Name Rb_Nikah Text Nikah 6 Rb_2 Name Rb_belumnikah Text Belum Nikah 7 Rb_2 Name Rb_cerai Text Duda/Janda 8 Cb_1 Name Cb_Proses Text &proses 9 St_2 Text Anak Name St_Anak 10 Sle_2 Name Sle_Anak text (Kosongkan) double klik pada window sehingga muncul event Open(), tuliskan script program berikut ini st_anak.visible = false sle_anak.visible = false double klik pada button rb_nikah, tuliskan script program berikut ini st_anak.visible = true sle_anak.visible = true sle_anak.setfocus() double klik pada button rb_belumnikah, tuliskan script program berikut ini st_anak.visible = false sle_anak.visible = false cb_Proses.SetFocus() double klik pada button rb_cerai, tuliskan script program berikut ini st_anak.visible = true sle_anak.visible = true sle_anak.setfocus() simpan Window, berikan nama w_lat4 Double klik pada Application Target lat4 , tuliskan perintah berikut ini: open(w_lat4) simpan kembali program Jalankan program tersebut
ArsysSolution/Abdrohim/PowerBuilder/02
website : http://www.arsys.or.id, mailto : [email protected]
3/5
Latihan 1 1. Buka target baru dengan NewApplication, berikan nama lat5 2. Buka window baru 3. Aktifkan window tersebut kemudian bentuk form seperti gambar berikut: Pada window tersebut terdapat 1 buah StaticText, 1 buah SingleLineEdit, 1 buah groupbox, 6 buah CheckBox, 1 buah MultiLineEdit dan 1 buah CommandButton
4. 5.
6.
Aktifkan window properti dengan mengklik kanan pada window kemudian pilih Properties Isikan pada nilai nilai properti sebagai berikut: No. Objek Properti Nilai 1 Window Title Entry data CheckBox 2 St_1 Text Nama 3 Sle_1 Name Sle_Nama Text (Kosongkan) 4 Gb_1 Text Pengambilan Matakuliah 5 Cbx_1 Name Cbx_agama Text &Agama 6 Cbx_2 Name Cbx_pancasila Text Panca&sila 7 Cbx_3 Name Cbx_matematika Text &Matematika 8 Cbx_4 Name Cbx_Internet2 Text &Internet 2 9 Cbx_5 Name Cbx_Pemrograman2 Text &Pemrograman 2 10 Cbx_6 Name Cbx_Statistik Text &Statistik 11 Cb_1 Name Cb_proses text Pro&ses 12 Mle_1 Name Mle_hasil Text (Kosongkan) double klik pada button cb_proses, tuliskan script program berikut ini String s s= sle_nama.text + ' mengambil matakuliah : ' mle_hasil.text='' if cbx_agama.Checked then s = s + 'Agama ' end if if cbx_pancasila.Checked then s = s + 'Pancasila ' end if if cbx_matematika.Checked then
ArsysSolution/Abdrohim/PowerBuilder/02
website : http://www.arsys.or.id, mailto : [email protected]
4/5
s = s + 'Matematika ' end if if cbx_internet2.Checked then s = s + 'Internet 2 ' end if if cbx_pemrograman2.Checked then s = s + 'Pemrograman 2 ' end if if cbx_statistik.Checked then s = s + 'Statistik ' end if mle_hasil.ReplaceText(s) 7. simpan Window, berikan nama w_lat5 8. Double klik pada Application Target lat5 , tuliskan perintah berikut ini: open(w_lat5) 9. simpan kembali program 10. Jalankan program tersebut Latihan 4 Buah lah sebuah program untuk memasukan data pendaftaran sebuah kursur komputer dengan data data sebagai berikut: Data Nilai Nama Text (25) Jenis Kelamin Laki-laki, Perempuan Alamat Text (50) Jenis Kursus Pemrograman, Jaringan Komputer Pemrograman Visual basic, Delphi dan Power Builder Jaringan Komputer Microsoft Window, Linux Dengan ketentuan-ketentuan dalam membuat programnya sbb: 1. Calon siswa hanya boleh memilih salah satu dari jenis kursus 2. Jika jenis kursus yang dipilih adalah pemrograman akan muncul pilihan DataPemrograman yang bisa dipilih lebih dari satu pilihan 3. Jika jenis kursus yang dipilih adalah jaringan komputer akan muncul pilihan DataJaringanKomputer yang bisa dipilih lebih dari satu pilihan
ArsysSolution/Abdrohim/PowerBuilder/02
website : http://www.arsys.or.id, mailto : [email protected]
5/5