FindObject Function

Memungkinkan objek untuk ditujukan pada saat waktu berjalan sebagai parameter string melalui nama objek.

Misalnya, perintah berikut:

MyObj.Prop1.Command = 5

sesuai dengan blok perintah:

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

Ini memungkinkan nama yang dibuat secara dinamis pada saat waktu berjalan. Sebagai contoh:

"TextEdit1" to "TextEdit5" in a loop to create five control names.

Lihat juga: FindPropertyObject

Sintaksis:

FindObject( ObjName As String )

Parameter:

ObjName: String that specifies the name of the object that you want to address at run-time.

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

12 Variabel tidak didefinisikan