DIM hConnectionTables AS .ConnectionTables
DIM hTable AS Table

FOR EACH hTable IN hConnectionTables
  ...
NEXT

Enumerates all the tables of the database.