this is my code..
Private Sub Command1_Click()
Dim i As Integer
For i = 0 To List1.ListCount
Label1.Caption = List1.ListCount
Next i
End Sub
Private Sub Command2_Click()
List1.AddItem Text1.Text
End Sub
what is wrong in my code? pls help.. thanks
- Add new comment
- 77 views