Example:
Sub Main
dim z(1 to 4) as double
z(1) = 1.11
z(2) = 2.22
z(3) = 3.33
For Each v In z
Print v
Next v
End Sub