MENULISKAN METHOD TEST
Jalankan VB Kamu
Buat Form seperti contoh :
Klik 2x pada Form dan ketikkan :
Private Sub Form_Load()
Combo1.AddItem "Billy Makapele"
Combo1.AddItem "Hendra Kindangen"
Combo1.AddItem "Marthen Pinulogod"
Combo1.AddItem "Glen Leong"
Combo1.AddItem "den Bagus"
End Sub
Perhatikan gambar di bawah :
Klik 2x Command Button “Add” dan ketikkan codingnya :
Private Sub Command1_Click()
List1.AddItem Combo1.Text
End Sub
Klik 2x Command Button “Delete” dan ketikkan codingnya :
Private Sub Command2_Click()
List1.RemoveItem List1.ListIndex
End Sub
Klik 2x Command Button “Clear” dan ketikkan codingnya :
Private Sub Command3_Click()
List1.Clear
End Sub
Terakhir, Klik 2x Command Button “Exit” dan ketikkan codingnya :
Private Sub Command4_Click()
End
End Sub
Untuk lebih jelasnya lihat video tutorial berikut :
Untuk contoh Latihannya bisa kamu download di sini.
Post a Comment
Terima Kasih Sudah Meninggalkan Komentar...