Membuat daftar menggunakan listbox

 Buat form seperti di bawah ini :
 
masukkan script dibawah ini :

Private Sub form_load()

List1.AddItem "siti jubaidah"

List1.AddItem "shasha kurnia"

List1.AddItem "novi dwi rahayu"

List1.AddItem "rizma nur praditha"

List1.AddItem "kiki puji astuti"

List1.AddItem "febi ramadhania dwiana"

List1.AddItem "nidia rossania"

List1.AddItem "mela widiyanti oktavia"

List1.AddItem "deviani prahasti"

End Sub

Private Sub form_loadclick()

List1.AddItem = "wiranu surya putra"

List1.AddItem = "dimas lilianto"

List1.AddItem = "dodi setiawan"

List1.AddItem = "ahmad roni kiswanto"

List1.AddItem = "annur fitriansyah"

List1.AddItem = "muhammad abdul affan"

List1.AddItem = "muhammad wahbi fadillah"

List1.AddItem = "mustakim"

List1.AddItem = "arisza marzuki"

List1.AddItem = "muhammad aditya"

List1.AddItem = "silvester"

List1.AddItem = "gusti agus yunior triawan"

List1.AddItem = "azhar yuda"

List1.AddItem = "adi wirajaya"

List1.AddItem = "isa"

List1.AddItem = "adam hilman"

List1.AddItem = "primanda"

List1.AddItem = "muhammad rizki fajri"

List1.AddItem = "ikhsan malik"

List1.AddItem = "muhammad faisal habibi"

End Sub

jalankan dengan menekan f5, inilah hasilnya :