DIM
hDateArray
AS
Date[]
DIM
aDate
AS
Date
FOR EACH
aDate
IN
hDateArray
...
NEXT
Enumerates each element stored in the array.