Tip 83: Listing Fields and Associated Properties for an Attached

* VB-CODE (1)

Abstract
This article describes a sample user-defined Access Basic function
that you can use to retrieve all field names and their associated
properties for an attached Microsoft=AE Access=AE table.

More Information
This article assumes that you are familiar with Access Basic and with
creating Microsoft=AE Access=AE applications using the programming tools
provided with Microsoft Access. For more information on Access Basic,
please refer to the Building Applications manual for Access 2.0 and
the Introduction to Programming manual for Access 1.x.

The example program below uses tools in Visual Basic=AE to get
information from a Microsoft Access database.

Example Program
This program demonstrates how to create and use the sample
ListFieldProperties() function.

1. Open the sample database NWIND.MDB. (This database can usually be
found in the C:\ACCESS\SAMPAPPS directory.)
2. From the File menu, choose New, and select Module.
3. Enter the following code to create the ListFieldProperties()
function:

Function ListFieldProperties ()
Dim MyDB As Database
Dim MyTable As TableDef
Set MyDB =3D DBEngine(0)(0)
Set MyTable =3D MyDB.TableDefs("Categories")
For X =3D 0 To MyTable.Fields.Count - 1
Debug.Print MyTable.Fields(X).Name
For Y =3D 0 To MyTable.Fields(X).Properties.Count - 1
Debug.Print Chr(9) & MyTable.Fields(X).Properties(Y).Name
Next Y
Next X
End Function

4. From the View menu, choose Immediate Window.
5. In the Immediate window, type the following line and press the
ENTER key:

? ListFieldProperties()

The name of each field in the Categories table will be displayed along
with that field's properties.

Additional References
"Name Property." (Product Documentation, Office Developer's Kit 1.0,
Microsoft Access 2.0, Language Reference)
"Using Properties." (Product Documentation, Office Developer's Kit 1.0,
Microsoft Access 2.0, Advanced Topics)

No comments: