Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB4,VB5,VB6,VBS
Expertise: Intermediate
Jun 10, 2000

Scan all the items in a multi-dimensional array with only one loop

It seems that you need two nested For loops to iterate over all the elements of a 2-dimensional array, and three loops for a 3-dimensional array, and so on. However, the For Each loop offers you a neat and concise solution, as this code proves:

' a 2-dimensional array of Strings
Dim arr(1, 2) As String
Dim i As Integer, j As Integer

' fill the array with strings
For i = 0 To 1
    For j = 0 To 2
        arr(i, j) = "(" + i + "," + j + ")"
    Next
Next

' only one loop to display its contents !!!
Dim v As Variant
For Each v In arr
    Debug.Print v
Next
Note that the For Each loop visits the array elements in the order they are stored in memory, that is one column after the other. This is the output produced by the above code:

(0,0)
(1,0)
(0,1)
(1,1)
(0,2)
(1,2)
Francesco Balena
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date