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.
  • Digg
  • Sphinn
  • del.icio.us
  • Facebook
  • Mixx
  • Google
  • Furl
  • Reddit
  • Spurl
  • StumbleUpon
  • Technorati
Reaksi: 

Leave a comment

Diharapka Memberikan Informasi Dan Feedback Yang sekiranya pantas Untuk Dibaca Ok .Kritikan Diterima Dengan Senang Hati....