Article ID: 180487
Article Last Modified on 3/11/2005
Private Sub Command1_Click()
Dim col As New Collection
Dim vnt
col.Add "Item1"
col.Add "Item2"
col.Add "Item3"
col.Add "Item4"
For Each vnt In col
MsgBox vnt
Next
End Sub
Additional query words: wince vbce vbce6 evb
Keywords: kbtoolkit kbpending KB180487