-->

COMBOBOX MULTI SELECT,COMBOBOX DENGAN ICON & VB CLASSIC TUTORIAL


Masih meneruskan tutorial Sebelumnya, Sekarang saya masih akan membahas tentang combobox, jika kemaren combobox bisa multi column dengan data diambil dari database, sekarang kita membahas combobox dengan icon dan combobox multi select tanpa database.

1. Buat projeck baru dengan VB6
2. Tambahkan control OsenxpSuite kedalam toolbox. Klik Project>Componet. Cari dan centang OsenXPSuite 2006
3. Tambahkan 2 OsenXPComboBox, 1 OsenXPButton, 1 OsenXPListbox
4. Masukan kode berikut kedalam codingan

Form 1 Code
Private Sub Form_Load()
OsenXPForm1.DrawGradientForm = True

OsenXPComboBox1.AddItem "Disket", NormalIcon:=0
OsenXPComboBox1.AddItem "CPU", NormalIcon:=1
OsenXPComboBox1.AddItem "Restore", NormalIcon:=2

OsenXPComboBox2.Style = CheckBox
OsenXPComboBox2.AddItem " Buku"
OsenXPComboBox2.AddItem " Pensil"
OsenXPComboBox2.AddItem " Pengahapus"

End Sub

Private Sub OsenXPButton1_Click()
OsenXPListBox1.Clear
For i = 0 To OsenXPComboBox2.ListCount - 1
    If OsenXPComboBox2.Selected(i) Then
        OsenXPListBox1.AddItem OsenXPComboBox2.List(i)
    End If
Next
End Sub

Silahkan di download dan dikomentari
Download Source Code
Download OsenXP Suite 2006 Setup
Download OsenXp Suite 2006 Key






Baca juga

Post a Comment