Penggunaan Combo Box Di Visual Basic (VB)

ComboBox merupakan objek yang paling sering digunakan dalam pemrograman visual untuk menentukan beberapa pilihan yang tersedia. Dalam penggunaan-nya, ComboBox selalu dikaitkan dengan struktur percabangan dalam kode programnya.
ComboBox hampir sama dengan Listbox, perbedaan-nya adalah pada combobox pilihan-nya ditampilkan dalam bentuk drop down list.

Penggunaan ComboBox

Untuk dapat mengisi/memberikan pilihan dalam combobox, pada desain form klik 2x pada area form yang kosong sehingga di tampilkan jendela view code Form Load (objek = form; procedure = load). Ganti procedure Load menjadi Activate sehingga menjadi Private sub form_Activate() pada view code.

Ketikkan kode program dibawah ini untuk mengisi pilihan pada combobox:

‘begin of file

Private Sub Form_Activate()
cmbjenis.AddItem (“None”)
cmbjenis.AddItem (“Stick Drum”)
cmbjenis.AddItem (“Double Pedal”)
cmbjenis.AddItem (“Keyboard”)

End Sub

‘end of file

Selanjutnya memberikan kode program untuk masing-masing pilihan combo, sebagai contoh ketika pengguna memilih Stick Drum maka akan ditampilkan tarif sewa dari Stick Drum.

Klik 2x pada objek combobox, ketikkan kode program dibawah ini.

‘begin of file

Private Sub cmbjenis_Click()
If cmbjenis.Text = “Stick Drum” Then
txttarif_alat.Text = 5000
Else
If cmbjenis.Text = “Double Pedal” Then
txttarif_alat.Text = 15000
Else
If cmbjenis.Text = “Keyboard” Then
txttarif_alat.Text = 25000
Else
txttarif_alat.Text = 0
End If
End If
End If
End Sub

‘end of file

Jalankan dengan menekan tombol F5 pada keyboard atau klik tombol Start pada toolbar.

Selamat mencoba.

These icons link to social bookmarking sites where readers can share and discover new web pages.

• 
• 
• 
• 
• 
• 
• 
• 
• 
• 
• 

Tags: Coding