Menggunakan Event dan Method

Bismillah Hirrahman Nirrahim
Assalamu'alaikum Wr. Wb

Kali ini saya akan membahas postingan tentang "Menggunakan Event dan Method". Langsung saja kita bahas :

- Aktifkan VB 6 melalui tombol start.
- Buka kembali project Latihan.vbp yang pada potingan sebelumnya :

1. Klik tab Existing
2. Pilih folder masing-masing pada bagian Look in.
3. Pilih file Latihan vbp.
4. Klik tombol Open.

Tambahkan Form baru ke dalam Project

1. Klik menu Project > Add Form
2. Klik tab New dan pilih Form
3. Klik tombol Open

Pada Jendela Form buatlah UI seperti ini :
(Gunakan komponen ListBox, ComboBox, dan CommandButton)

Pengaturan property setiap object-nya adalah sebagai berikut :

Menulis Kode Program : Method Text
- Pada bagian Code Editor ketikkan programnya sebagai berikut :

Private Sub Form_Load()
   Combo1.AddItem "Umar"
   Combo1.AddItem "Salman"
   Combo1.AddItem "Halimah"
   Combo1.AddItem "Shafira"
End Sub

Private Sub Command1_Click()
   List1.AddItem Combo1.Text
End Sub

Private Sub Command2_Click()
   List1.RemoveItem List1.ListIndex
End Sub

Private Sub Command3_Click()
        List1.Clear
End Sub

- Simpan Form2 (nama file : Lat2.frm).
- Klik menu Project > Project1 Properties lalu klik tab General. Gantilah Startup Object-nya menjadi Form2 :

Keterangan : Startup Object menentukan object mana yang muncul setiap kali sebuah project dijalankan.

- Coba jalankan Project1 :

Untuk menambah isi ListBox : pilih "Umar" di dalam ComboBox kemudian klik tombol Add. Ulangi untuk nama-nama yang lain secara acak.
Untuk menghapus salah satu isi ListBox : pilih "Shafira" di dalam LixtBox kemudian klik tombol Delete.
Untuk menghapus semua isi ListBox : klik tombol Clear.

Penjelasan kode program :

Private Sub Form_Load()
   Combo1.AddItem "Umar"
   Combo1.AddItem "Salman"
   Combo1.AddItem "Halimah"
   Combo1.AddItem "Shafira"
End Sub

Pada saat Form2 di-load ke dalam memori komputer, object Combo1 diisi dengan beberapa nama.

Private Sub Command1_Click()
   List.AddItem Combo1.Text
End Sub

Ketika seorang user meng-klik tombol Add (object Command1) maka isi object ditambah sesuai dengan isi object Combo1 yang sudah dipilih.

Private Sub Command2_Click()
   List1.RemoveItem List1.ListIndex
End Sub

Ketika seorang user meng-klik tombol Delete (object Command2) maka isi object List1 yang dipilih akan dihapus. Catatan : bila belum ada isi yang dipilih akan terjadi error.

Private Sub Command3_Click()
   List.Clear
End Sub

Ketika seorang user meng-klik tombol Clear (object Command3) maka semua isi object List1 akan dihapus.

Cara penulisan (syntax) kode program untuk menggunakan method dari sebuah object adalah berikut :

nama_object.method [argument]

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 akan membantu Anda agar tidak salah mengetikkan nama_object maupun method-nya. Komponen ComboBox dan ListBox memiliki beberapa method untuk mengatur isi (item) di dalamnya,
yaitu :

AddItem – method ini akan menambah isi sesuai dengan argument yang diberikan berupa tulisan.
Setiap kali ada isi yang ditambahkan akan diberikan nomer index secara otomatis dimulai dari 0
(nol).
Contoh :
Combo1.AddItem “Umar” -> “Umar” adalah argument sebagai isi yang akan ditambahkan
ke dalam object Combo1.
List1.AddItem Combo1.Text -> property Text dari object Combo1 adalah argument
sebagai isi yang akan ditambahkan ke dalam object List1.
RemoveItem – method ini akan menghapus isi sesuai dengan argument yang diberikan berupa
nomer index dari isi yang dipilih. Setiap kali ada isi yang dihapus maka nomer index akan disusun ulang secara otomatis. Bila isinya tidak ada (kosong) nomer index-nya adalah –1.
Contoh :
List1.RemoveItem List1.ListIndex -> property ListIndex dari object List1 adalah argument
sebagai nomer index isi yang akan dihapus.
Clear – method ini akan menghapus semua isi (tidak membutuhkan argument).
Contoh :
List1.Clear -> semua isi object List1 akan dihapus.