Latihan 2 Visual Basic - Method Test

Latihan 2 Visual Basic - Method Test

Private Sub Form_Load()
    Combo1.AddItem "Umar"
    Combo1.AddItem "Salman"
    Combo1.AddItem "Halimah"
    Combo1.AddItem "Shafira"
    Combo1.ListIndex = 0
End Sub

Private Sub Command1_Click()
    List1.AddItem Combo1.Text
    Combo1.SetFocus
End Sub

Private Sub Command2_Click()
    List1.RemoveItem List1.ListIndex
End Sub

Private Sub Command3_Click()
    List1.Clear
    Combo1.SetFocus
End Sub

Posted in: Latihan,Pemrograman