VB 6

1.1 Membuat User Interface (UI)
Aktifkan VB 6 melalui tombol Start. Buka kembali project Latihan.vbp :


Tambahkan Form baru ke dalam Project :

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


Pengaturan property setiap object-nya adalah sebagai berikut :


Pada bagian Code Editor ketikkan kode 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 :

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 ListBox 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()
List1.AddItem Combo1.Text
End Sub

Ketika seorang user meng-klik tombol Add (object Command1) maka isi object List1 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()
List1.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 sebagai 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.