FindObject 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( ObjName As String )
参数：
ObjName：一个字符串，用于指定运行时要定位的对象名称。