25 July 2014

VB6: Combobox Control

Property yang Umum Digunakan

PropertyKeterangan
BackColorWarna latar combobox.
EnabledJika true maka user dapat berinteraksi, jika false tidak.
FontTampilan teks font name, style, dan size.
ForeColorWana Teks.
HeightTinggi combobox dalam twips.
IndexNomor urut jika akan dibuat control array.
LeftJarak dari kiri ke combobox dalam twips.
ListIsian list item yang ada pada combobox.
LockedJika di set True maka user tidak dapat mengubah nilai pilihan pada combobox.
ShortedJika true maka list item akan diurutkan.
StyleAda 3 macam Style Combobox: Dropdown Combo, Simple Combo, dan Dropdownlist (penjelasan dibawah).
TabIndexUrutan fokus aktif jika menekan tombol Tab pada keyboard.
TextTeks yang akan ditampilkan sebagai item terpilih pada combobox.
ToolTipText
Tulisan akan akan muncul ketika running dan mouse pointer ada di atas combobox.
TopJarak dari atas ke combobox dalam twips.
VisibleJika True maka user dapat melihat combobox dan control didalamnya, sebaliknya jika false maka tersembunyi.
WidthLebar combobox dalam twips.

Event yang Umum Digunakan
Event Keterangan
Change Saat teks pada combobox berubah.
Click Saat mouse mengklik untuk memilih item dari list.
DropDown Saat Dropdown Combo ditampilkan.
GotFocus Saat Combobox menerima fokus aktif.
LostFocus Saat Combobox kehilangan fokus aktif.

Method yang Umum Digunakan
MethodKeterangan
AddItemMenambahkan item ke list item.
ClearMembersihkan semua item dari list.
RemoveItemMenghapus item tertentu dari list.
SetFocusMemindahkan fokus aktif ke Combobox.

Contoh Penggunaan Combobox.
1. ComboBox Style
Dropdown Combo: Teks dapat diketik manual dan bisa berbeda dengan item yang ada di list.
Simple Combo: Tanpa dropdown, untuk memilih list menggunakan tombol panah atas bawah pada keyboard.
Dropdown List: Teks tidak dapat diubah dengan ketik manual, hanya bisa memilih yang ada pada list.
2. ComboBox Add, Remove, dan Clear Item
UI:

Code:
Private Sub cmdAdd_Click()
Combo1.AddItem Text1.Text
End Sub

Private Sub cmdRemoved_Click()
If Combo1.ListCount > 0 Then
   Combo1.RemoveItem (Combo1.ListIndex)
End If
End Sub

Private Sub cmdClear_Click()
Combo1.Clear
End Sub


Runtime:
- Add


- Remove

- Clear

3. ComboBox Sorted

Click here if you like this article.


0 comments: