validar que tablas existen y problema de desbordamiento

[carnero]

Código vb:

CommonDialog1.CancelError = True
    On Error GoTo ErrHandler
    
    CommonDialog1.Flags = cdlOFNHideReadOnly
    CommonDialog1.Filter = "BASE DE DATOS ACCESSES (*.mdb)|*.mdb"
    CommonDialog1.FilterIndex = 2
    CommonDialog1.ShowOpen
    bd = CommonDialog1.FileName
    GoTo bd
    Exit Sub
    
ErrHandler:
    Unload Me
    Exit Sub
bd:
Set cnn = New ADODB.Connection
    With cnn
    .ConnectionString = _
        "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data source=" & bd & ";"
    .Open
    End With
 

MIRA ASI PARTE MI PROGRAMA, SI YO SELECCIONO LA BASE DE DATOS "CURSO" ES CORRECTO Y MI PROGRAMA VA A TRABAJAR DE BUENA MANERA PORQUE LOS NOMBRES DE LAS TABLAS COINCIDEN. PERO SI YO SELECCIONO LA TABLA "AUTOS" ES INCORRECTO PARA MI PROGRAMA YA QUE LOS NOMBRES DE LAS TABLAS NO COINCIDEN.

ESPERO SE ENTIENDA, GRACIAS

y si me pueden ayudar con esto tambien, probelma de desbordamiento