Funkcja FindObject

Pozwala adresować obiekt podczas wykonywania programu przez jego nazwę w postaci ciągu.

Na przykład następująca instrukcja:

MyObj.Prop1.Command = 5

odpowiada następującemu blokowi poleceń:

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

Pozwala to na dynamiczne tworzenie nazw podczas wykonywania programu. Na przykład:

'TextEdit1' do 'TextEdit5' w pętli, aby utworzyć pięć nazw kontrolnych.

Zobacz także: FindPropertyObject

Składnia:

FindObject( ObjName As String )

Parametry:

Nazwa_obiektu: Ciąg określający nazwę obiektu adresowanego podczas wykonywania programu.