Access VBA教程:Type属性

应用于 AccessObject对象的 Type属性。

返回一个AccessObject对象类型的值。AcObjectType 型,只读。

AcObjectType 可以是下列 AcObjectType 常量之一:
acDataAccessPage
acDefault
acDiagram
acForm
acFunction
acMacro
acModule
acQuery
acReport
acServerView
acStoredProcedure
acTable

expression.Type

expression   必需。返回 AccessObject对象的表达式。

应用于 FormCondition对象的 Type属性。

返回一个FormatCondition对象类型的值。AcFormatConditionType,只读。

AcFormatConditionType 可以是下列 AcFormatConditionType 常量之一:
acExpression
acFieldHasFocus
acFieldValue

expression.Type

expression   必需。返回 FormatCondition对象的表达式。

应用于 Module对象的 Type属性。

指明一个模块是标准模块还是类模块。AcModuleType,只读。

AcModuleType 可以是下列 AcModuleType 常量之一:
acClassModule
acStandardModule

expression.Type

expression   必需。返回 Module对象的表达式。

VBA示例

应用于 Module对象的 Type属性。

下面的示例确定 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

上页:Access VBA教程:TripleState属性 下页:Access VBA教程:UnderlineHyperlinks属性

Access VBA教程:Type属性

Access VBA教程:UnderlineHyperlinks属性 Access VBA教程:UndoBatchEdit属性
Access VBA教程:UniqueRecords属性 Access VBA教程:UniqueTable属性
Access VBA教程:UniqueValues属性 Access VBA教程:UpdateOptions属性
Access VBA教程:UseDefaultPrinter属性 Access VBA教程:UseLongFileNames属性
Access VBA教程:UserControl属性 Access VBA教程:UseTransaction属性
Access VBA教程:ValidationRule属性 Access VBA教程:ValidationText属性
Access VBA教程:Value属性 Access VBA教程:VBE属性
Access VBA教程:Verb属性 Access VBA教程:Version属性
Access VBA教程:Vertical属性 Access VBA教程:VerticalDatasheetGridlineStyle属性
Access VBA教程:ViewChange属性 Access VBA教程:ViewsAllowed属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号