Menggunakan Event dan Property lewat Visual Basic

Bismillah Hirrahman Nirrahim
Assalamu'alaikum Wr. Wb

Halo semua.. :D, sebelumnya saya telah memposting tentang cara membuat kalkulator lewat VB, sekarang saya akan membahas tentang cara menggunakan Event dan Property lewat Visual Basic. Okay langsung saja..

Pertama, 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. Sehingga UI-nya menjadi seperti ini :
Kedua, Pilih object Command1 pada bagian Object Selector. Secara otomatis pada bagian Code Editor akan muncul blok kode program berikut :

Privat 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 = Text.Text
End Sub

Private Sub Command2_Click()
End
End Sub

Ketiga, 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 mengklik tombol Start pada bagian Toolbar atau tekan tombol F5 pada keyboard. Ketikkan "Salmad" di dalam TextBox kemudian klik tombol OK. Maka akan tampil hasil sebagai berikut :

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 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 :

Fasilitas ini disebut Intellisense, dan sangat membantu Anda agar tidak salah mengetikkan nama_object

Modifikasi Kode Program
Ubah tampilan UI-nya menjadi seperti ini :
(Tambahkan komponen Frame, OptionButton dan CheckBox)

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 si 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 Option_Click()
Label2.ForeColor = vbBlue
End Sub

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

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

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

Simpan kembali Form1, kemudian coba jalankan Project1 dan lihat hasilnya

Okey, saya rasa cukup pembahasan dari saya
Wassalamu'alaikum Wr. Wb.

Postingan jelek, biarin yang penting saya puas.... :v :v