PRB: Type Mismatch with Default Prop of VB4 Data Access Object

Last reviewed: October 30, 1995
Article ID: Q127029
The information in this article applies to:
  • Standard, Professional and Enterprise Editions of Microsoft Visual Basic, 16-bit and 32-bit, for Windows, version 4.0

SYMPTOMS

Some data access objects in Visual Basic for Windows version 4.0 no longer have the default "Name" property. Instead, these objects now have a default collection. This change can lead to "Type Mismatch" (Error 13) or "Invalid Argument" (Error 3001) errors when attempting to run your code.

WORKAROUND

To work around this problem, add the name of the property you want to reference.

For example, use this:

   MsgBox Data1.Database.TableDefs(0).Name

instead of this:

   MsgBox Data1.Database.TablesDefs(0)

MORE INFORMATION

If a data access object in Microsoft Visual Basic version 4.0 has a collection as a property, the collection is now the default property. There is no longer support for default properties on any objects except Field, Parameter and Property objects.

This is a change in behavior from Microsoft Visual Basic version 3.0 where the "Name" property was the default property for TableDef object.

Having a default collection allows the user to implement a short hand syntax for referencing into the collection.

For example, this:

   MsgBox Data1.Database.TableDefs(0).Fields(0).Name

can be written as this:

   MsgBox Data1.Database.TableDefs(0)(0).Name


Additional reference words: 4.00 compatibility vb4win vb4all
KBCategory: kbprg kbprb
KBSubcategory: APrgDataAcc


THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: October 30, 1995
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.