FindPropertyObject 函数

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

例如，以下命令:


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"，创建五个控件名称。

请参阅: FindObject

语法:


FindPropertyObject( ObjVar, PropName As String )

参数:

「ObjVar」:要在运行时动态定义的对象变量。

「PropName」: 一个字符串，用于指定运行时要定位的属性名称。

错误代码:

5 无效的过程调用

12 变量未定义

14 无效参数

52 错误的文件名或编号