PRB: Type Mismatch with Default Prop of VB4 Data Access Object
Symptoms
Some data access objects in Visual Basic for Windows version 4.0 no longerhave the default “Name” property. Instead, these objects now have a defaultcollection. This change can lead to “Type Mismatch” (Error 13) or “InvalidArgument” (Error 3001) errors when attempting to run your code.
Resolution
To work around this problem, add the name of the property you want toreference.
For example, use this:
MsgBox Data1.Database.TableDefs(0).Name instead of this:
MsgBox Data1.Database.TablesDefs(0)
