Apa itu List Box warna
Tutorial VB List box warna itu hanya menambahkan warna di list box, dengan beragam warna dasar. Simplenya cukup mengklick Fill Listbox, maka akan menampilkan list2 yang sudah tercodekan dalam form
Visual Basic
Komponen pada List Box Color
Desain Gambar sesuai dengan gambar
Isi Visual Basic:
- Form1
- Module1
Komponen dalam Form:
- List Box
-Commandbutton
-Image(banner)
Syarat Komponen tambahan:
- Tidak ada
Berikut ini adalah
penjelasan tentang kode pada Form1
Option Explicit
Private Sub Form_Load()
'Sub "Form", untuk menangkapn peringatan dalam bentuk message ...
lPrevWndProc = SetWindowLong(hwnd, GWL_WNDPROC, AddressOf SubClassedList)
End Sub
Private Sub Form_Unload(Cancel As Integer)
'Lepaskan SubClassing, Sangat Penting untuk Mencegah Crashing!
Call SetWindowLong(hwnd, GWL_WNDPROC, lPrevWndProc)
End Sub
Private Sub Command1_Click()
Dim I As Integer
For I = 0 To 15
' menload 0 sampai 15 data pada list box
' ini digunakan untuk menset warnanya
List1.AddItem "Color " & I
List1.ItemData(List1.NewIndex) = QBColor(I)
Next
End Sub
Untuk membaca penjelasan tentang Module1 beserta link downloadnya, silahkan clik List box warna module
