XtremePapers

Program Task: List Numbers From 1 To 10 Via “FOR”...“NEXT” Loop


Dim time As Integer

Private Sub Command1_Click()
For time = 1 To 10
List1.AddItem (time)
Next time
End Sub

Private Sub Command2_Click()
List1.Clear
End Sub

Private Sub Command3_Click()
Unload Me
End Sub