DIM
hShortArray
AS
Short[]
DIM
anInteger
AS
Integer
FOR EACH
anInteger
IN
hShortArray
...
NEXT
Enumerates each element stored in the array.