FindPropertyObject Function

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

例如,以下命令:

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 错误的文件名或编号

57 设备 I/O 错误