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" to "TextEdit5" in a loop to create five control names.

Error codes:

5 ការ​ហៅ​បែបបទ​មិន​ត្រឹមត្រូវ

12 អថេរ​មិន​ត្រូវ​បាន​កំណត់

14 ប៉ារ៉ាម៉ែត្រ​មិន​ត្រឹមត្រូវ

52 ឈ្មោះ ឬ​លេខ​ឯកសារ​មិន​ត្រឹមត្រូវ

57 កំហុស​ឧបករណ៍ I/O