Type Property
Type property as it applies to the AccessObject object.
Returns the value of an AccessObject object type. Read-only AcObjectType.
| AcObjectType can be one of these AcObjectType constants. |
| acDataAccessPage |
| acDefault |
| acDiagram |
| acForm |
| acFunction |
| acMacro |
| acModule |
| acQuery |
| acReport |
| acServerView |
| acStoredProcedure |
| acTable |
expression.Type
expression Required. An expression that returns an AccessObject object.
Type property as it applies to the FormatCondition object.
Returns the value of a FormatCondition object type. Read-only AcFormatConditionType.
| AcFormatConditionType can be one of these AcFormatConditionType constants. |
| acExpression |
| acFieldHasFocus |
| acFieldValue |
expression.Type
expression Required. An expression that returns a FormatCondition object.
Type property as it applies to the Module object.
Indicates whether a module is a standard module or a class module. Read-only AcModuleType.
| AcModuleType can be one of these AcModuleType constants. |
| acClassModule |
| acStandardModule |
expression.Type
expression Required. An expression that returns a Module object.
Example
As it applies to the Module object.
The following example determines whether a Module object represents a standard module or a class module:
Function CheckModuleType(strModuleName As String) As Integer
Dim mdl As Module
' Open module to include in Modules collection.
DoCmd.OpenModule strModuleName
' Return reference to Module object.
Set mdl = Modules(strModuleName)
' Check Type property.
If mdl.Type = acClassModule Then
' Insert comment.
mdl.InsertLines 1, "' Class module."
CheckModuleType = acClassModule
Else
' Insert comment.
mdl.InsertLines 1, "' Standard module."
CheckModuleType = acStandardModule
End If
End Function
