Program Listbox Visual Basic Dengan VB6.0

Kali ini saya akan membahas program untuk membuat Menu listbox dengan menggunakan Visual Basic 6.

Buatlah form seperti di bawah ini:


Dalam program ini, user diminta untuk memilih menu yang terdapat pada pilihan di listbox sebelah kiri dengan cara mengklik tombol ">", maka setelah itu menu yang dipilih akan berpindah ke listbox sebelah kanan. Demikian juga sebaliknya.

Adapun komponen-komponen yang diperlukan untuk membuat program tersebut adalah :
- 2 buah listbox (list1 dan list2)
- 2 buah tombol (command1 dan command2)
-1 buah label (www.herfikom.hexat.com)

Source programnya adalah sebagai berikut :

Private Sub Command1_Click()

List2.AddItem (List1.Text)

List1.RemoveItem (List1.ListIndex)

End Sub

Private Sub Command2_Click()

List1.AddItem (List2.Text)

List2.RemoveItem (List2.ListIndex)

End Sub

Private Sub Form_Load()

List1.AddItem "HERI AFRIZAL"

List1.AddItem "IRMAWATI"

List1.AddItem "RAHMAT"

List1.AddItem "EKA SULASTRI"

List1.AddItem "ALMUKARRAM"

List1.AddItem "FARADILLA"

List1.AddItem "MURIZAL"

List1.AddItem "HELMIZAR"

List1.AddItem "MUKHLIS"

List1.AddItem "NOVITA SARI"

Tampilan program ketika dijalankan :

 

Program ini dibuat oleh Heri Afrizal di bireuen

http://hery-pc.blogspot.com