CimDatabase.Tables (read-only property)

Gets the tables collection.
Syntax: Set CimTables = object.Tables
Description: The CimDatabase.Tables returns a collection of tables in the CimDatabase object.

Examples

Dim oProject as CimProject
Dim oDb as CimDatabase
Dim oTables as CimTables
Set oProject = CreateObject("CimProject")
Project.OpenLocalProject "c:\cimpdemo\cimpdemo.gef"
Set oDb = oProject.Database
Set oTables = oDb.Tables
OR
For Each oTable in oDb.Tables
MsgBox oTable.Name
Next