code:

---

$Array[$RecCount]  

---

code:

---

$Index = 0
$Line = ReadLine(Something)
while @ error = 0
      $Array[$Index] = $Line
      $Index = $Index +1
      $Line = ReadLine (Something)
Loop 

---

code:

---

  $Index = 0
While (Stuff Happening)
   $STMI[$Index] = Val ("$Line")
   ?"Value: "$Array[$Index]
   $STMITot = $STMITot + $STMI[$Index]
   $Index = $Index + 1
Loop

---

code:

---

break on
$RecCount=5
Dim $Array[$RecCount]  

? ubound($Array)


$Index = 0

for $index=1 to 5
      $Array[$Index] = $index
next 

For each $item in $Array
   ? $item
next  

---