[VB6] Controllo esistenza tabella

[buburp]

Uso ADO.
Spulciando la documentazione online ho visto che si può fare così:

Set DBScr = New ADOX.Catalog
DBScr.ActiveConnection = strAccess & "database.mdb"
For Each Tabella In DBScr.Tables
   If Tabella.Type = "TABLE" Then
      If Tabella.Name = "MiaTabella" Then Exit For
   End If
Next
Set DBScr = Nothing

ma mi chiedo se sia proprio necessario elencarle.