Dim a As New ArrayList
For i As Integer = 1 To 52
a.Add(i)
i = i + 1
Next
For Each number As Integer In a
Debug.Print(number)
Next
The debug.Print shows me that I only got these numbers to populate:
1
3
5
7
9
11
13
15
17
19
21
23
25
27
29
31
33
35
37
39
41
43
45
47
49
51

New Topic/Question
Reply


MultiQuote


|