DIM hTableIndex AS .TableIndex
FOR EACH hTableIndex
  ...
NEXT

Enumerates all indexes by changing the current index representing by the object.