Simplest to query the system table directly:
SELECT MsysObjects.Name FROM MsysObjects
WHERE (([Type] = 1) AND ([Name] Not Like "~*")
AND ([Name] Not Like "MSys*"))
ORDER BY MsysObjects.Name;
Alternatively, loop through the TableDefs collection of dbEngine(0)(0) in
DAO, or the Tables of the Catalog in ADOX (removing Views, etc.)