FindObject 函数

使用对象名称作为字符串参数运行时要定位的对象。

例如,以下命令:


MyObj.Prop1.Command = 5

与以下命令块相对应:


Dim ObjVar as Object
Dim ObjProp as Object
ObjName As String = "MyObj"
ObjVar = FindObject( ObjName As String )
PropName As String = "Prop1"
ObjProp = FindPropertyObject( ObjVar, PropName As String )
ObjProp.Command = 5

这样就可以在运行时动态建立名称。例如:

在一个循环中使用 "TextEdit1" 到 "TextEdit5",创建五个控件名称。

请参阅: FindPropertyObject

语法:


FindObject( ObjName As String )

参数:

ObjName」: 一个字符串,用于指定运行时要定位的对象名称。

错误代码:

5 无效的过程调用

12 变量未定义

请支持我们!