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

57 设备 I/O 错误

请支持我们!