MS访问:确定对象类型

看看

typeOf and typeName

通用对象变量(即声明为对象的变量) 可以保存来自任何类的对象。使用Object类型的变量时, 对象例如,某些对象可能不支持特定的 属性或方法。VisualBasic提供了两种确定 对象变量中存储了哪种类型的对象:TypeName

这个 TypeName函数返回一个字符串,是在 需要存储或显示对象的类名,如 以下代码片段:

Dim Ctrl As Control = New TextBox  
MsgBox(TypeName(Ctrl))

TypeOf…Is运算符是测试对象的 使用TypeName。下面的代码片段使用TypeOf…在

If TypeOf Ctrl Is Button Then  
    MsgBox("The control is a button.") 
End If

确定access中的访问类型的最简单方法是在access的系统表中进行对象查找。

以下是查找:

DLookup("Type","MSysObjects","NAME = '" & strObject & "'")

strObject 是Access中对象的名称

结果是下面的数字之一,如果Access中不存在对象,则为NULL

1 = Access Table
4 = OBDB-Linked Table / View
5 = Access Query
6 = Attached (Linked) File  (such as Excel, another Access Table or query, text file, etc.)
-32768 = Access Form
-32764 = Access Report
-32761 = Access Module

因此,dlookup将为表单提供“-32768”,或为报告提供“-32764”