Belajar Combobox dan Listbox pada Visual Basic 6.0

1. Buka Microsoft visual basic 6.0 dan buat tampilan form seperti ini dan pada properties pada combobox yaitu LIST diisi dengan MOTOR dan MOBIL seperti pada gambar dibawah ini.



2. Double klik pada combobox dan ganti event pada combobox dengan Click seperti gambar dibawah ini.

3. Lalu ketik syntax ini
If Combo1.ListIndex = 0 Then

Text1.Text = "1000"

Else

Text1.Text = "2000"

End If

Penjelasan perintah diatas

Apabila kita memilih MOTOR pada combo1 maka yang akan tampil pada text1 yaitu “1000”

Dan apabila yang kita pilih MOBIL pada combo1 maka yang akan tampil pada text1 yaitu “2000”

4. double klik pada Command button “ADD” dan ketik perintah ini
List1.AddItem Combo1.Text

List2.AddItem Text1.Text

5. Lalu kita Run dengan menekan tombol F5 ini hasilnya