Popular Post

Posted by : Kangco'ol Kamis, 08 Februari 2018



PENGENALAN PROGRAM VISUAL BASIC 6.0
          (Menggunakan Event dan Property)

1.1 Membuat User Interface (UI)
membuat User Interface (UI)

Aktifkan VB 6 .0
Kenali jenis-jenis komponen (control) yang ada di dalam bagian ToolBox :
https://lh4.googleusercontent.com/Ckw_WhIDHbVchrVGgwagOmFxA-lWDzGiAVaKzlKuYBc3Y0xSI6vOBixXyC2iGcJaWA_BegL2pG5t-JLnyf80WzVYdNlx0PqkpRCEzuNnhP09ir2XYQ

Pada Jendela Form buatlah UI seperti ini :
https://lh6.googleusercontent.com/h19NqbGldwVlSjdVQz5npqDVnvFW-Tzj-rh8JNPP3VYCDGiLnOhlehO3UC_qCARHxJ8FP2j6MFMnpxL6bOEF9T5aprFrGlG693UaltcQ3w3qqwUa6w

Cara membuatnya :
Klik komponen Label di dalam ToolBox kemudian “gambar” object Label1 di dalam Form dengan cara drag-drop. Lakukan langkah yang sama untuk object Label2. Object Text1 di-“gambar” menggunakan komponen TextBox, sedangkan object Command1 dan Command2 menggunakan komponen Command Button.

Kenali bagian-bagian di dalam Jendela Properties :
Keterangan Properties
Nama Propertiest
Object di pilih
Nilai Propertiesthttps://lh6.googleusercontent.com/fiA8PvABRUB5YfR0FA3Y-wnDq0islPY5iCpSw1sraqsC03Rz1YacVpivGvEYdntXSuOskJtA5niWJY1kHDXv-GxBC6ASf1AaIfHYypvTAwF4teVkxg

Melalui Jendela Properties atur property setiap object sebagai berikut :
Object
Properties
Value
Form1
Caption
StartUpPosition
Property Test
2 – CenterScreen
Label1
Caption
Tuliskan nama Anda :
Text1 - -


Label2
Alignment
BackColor
Font
2 – Center
Palette: <putih>
Size: 24
Command1
Caption
OK
Command2
Caption
Selesai


Sehingga UI-nya menjadi seperti ini :
https://lh5.googleusercontent.com/7Pyym2RWYlzNeT-tcQKvySHxv85VKgx-J-DiGGV9ZIJZw75_NMnX1P_5kjdcjhuLbkR3_pOigrJqk04Zl0iPvXQ_ck7noeY8oeTo4nwXvLIfWV-r0A

1.3 Menulis Kode Program : Property Test


Event /Kejadian
Buka Jendela Code dan kenali bagian-bagian di dalamnya :

Object
Code/ Program
https://lh3.googleusercontent.com/Oyen0BDWlI4bYM1OTj1LezMdXngA_DMzCyc109tO1iWN4C_4Z68DvMzM-GFT977k8e5Y-5plxJws3m8SzgAb9aGho6ciw86BGTXDCQIOAc-ty9wxsA

Program yang berbasis Windows bersifat event-driven, artinya program bekerja berdasarkan event yang terjadi pada object di dalam program tersebut. Misalnya, jika seorang user meng-klik sebuah tombol maka program akan memberikan “reaksi” terhadap event klik tersebut. Program akan memberikan “reaksi” sesuai dengan kode-kode program yang dibuat untuk suatu event pada object tertentu.

Pilih object Command1 pada bagian Object Selector. Secara otomatis pada bagian Code Editor akan
muncul blok kode program berikut :

Private Sub Command1_Click()

End Sub

Event Click merupakan event default (standar) dari object Command1, Anda bisa melihat event lainnya pada bagian Event Selector.

Pada bagian Code Editor ketikkan kode programnya sebagai berikut :

Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub

Private Sub Command2_Click()
End
End Sub

Simpan Project1 (nama file : Latihan.vbp) dan Form1 (nama file : Lat1.frm). VB 6 akan menyimpan
program yang Anda buat ke dalam beberapa file yang saling terkait, antara lain : file project (*.vbp), file form (*.frm) dan file module (*.bas).
Coba jalankan Project1 dengan meng-klik tombol Start (https://lh5.googleusercontent.com/jiFLge2IZhMKCjFWDBSwbPDV59z0QMZxfuY2k2JSuLOhBZVqd-gyny-OoiptQp-c_GPWA2ozcg72vyHn-paMYkVYx4QxTj7KTIzEfJ18bk43pmt_IA
https://lh4.googleusercontent.com/qUOgaKKt43mfKuSPnePc1euYnlJmG1SL9YaAoNs5Bmbe2_AwqT9tZ0NZ-Ai1Lgpo2W74HEKsM9pGhWOCnljzuz5SRRJMpo5a67JjqRUUJWScuLD6QA

Bila ingin keluar klik tombol Selesai.


Penjelasan kode program :
Berikut diberikan penjelasan bagaimana cara kerja program sederhana di atas

Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub

Ketika seorang user meng-klik tombol OK (object Command1) maka isi tulisan pada object Label2 akan sama dengan isi tulisan pada object Text1. Property Caption pada obyek Label2 digunakan untuk
menampilkan text tertentu di obyek tersebut.
Selanjutnya untuk keluar dari program dituliskan kode berikut :

Private Sub Command2_Click()
End
End Sub

Ketika seorang user meng-klik tombol Selesai (object Command2) maka program akan berhenti.
Perintah End digunakan untuk menutup program.
Menampilkan tulisan merupakan salah satu property yang dimiliki oleh komponen Label. Property isi
tulisan pada komponen Label adalah Caption, sedangkan pada komponen Textbox adalah Text.
Cara penulisan (syntax) kode program untuk mengatur property sebuah object adalah sebagai berikut :

nama_object.property = value

Perhatikan, setelah Anda mengetikkan tanda titik (dot) dibelakang nama_object maka VB 6 akan
menampilkan daftar property dan method yang dimiliki oleh nama_object :
https://lh5.googleusercontent.com/YYab_VEjEF3z4ljhJo5swQq3RPD-kW2JvMzD4g7sO5fPl9FthnWDa90o4tE4U1rz9UIgyZrPaTM7CIgtoxA2ftrvx41LN5zyp8Ju4Qe5O_zgWEIhuA

Fasilitas ini disebut Intellisense, dan sangat membantu Anda agar tidak salah mengetikkan nama_object maupun property-nya.

1.4 Modifikasi Kode Program
Ubah tampilan UI-nya menjadi seperti ini :
(Tambahkan komponen Frame, OptionButton dan CheckBox)
https://lh6.googleusercontent.com/ZBsDfTP5Rm-UVDVohIKPfexmslbNpFjOFDCypd9DMPU2tDd60kPkWkir67dpGHdYlYUkLxFQB50X6Ypv91LLo5GUhlpvp6a5ZyS1lBaX7tMYrGJpyQ

Atur property object-object tambahannya sebagai berikut :
Object
Properties
Value
Frame1
Caption
Pilihan :
Option1
Caption
Biru
Option2
Caption
Merah
Check1
Caption
Tebal
Check2
Caption
Miring





Obyek Frame1 harus dibuat terlebih dahulu di form, dan selanjutnya obyek Option dan Check dibuat di dalam Frame1 tersebut. Tujuan pembuatan berbagai pilihan tersebut adalah memperkenalkan pada Anda fasilitas Option dan CheckBox yang digunakan untuk membuat pilihan dalam aplikasi.
Tambahkan kode programnya sebagai berikut :

Private Sub Option1_Click()
Label2.ForeColor = vbBlue
End Sub

Private Sub Option2_Click()
Label2.ForeColor = vbRed
End Sub

Private Sub Check1_Click()
Label2.FontBold = Check1.Value
End Sub

Private Sub Check2_Click()
Label2.FontItalic = Check2.Value
End Sub

Simpan kembali Form1, kemudian coba jalankan Project1 dan lihat hasilnya :
https://lh4.googleusercontent.com/HI5IIDV1T6oC1A2Y2a-cvruAumRiLUYtkonwIaMh1QRNa0GlpAHpsBJX8OInpO6phdGpDTfw0vIjXSxmsF9mD9IR0l_Iuz8Ry5XsS_G3R6FepeQQ9w

Leave a Reply

Subscribe to Posts | Subscribe to Comments

- Copyright © Go.BLOG.Sch.id - Date A Live - Powered by Blogger - Designed by Johanes Djogan -