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

ይህ የሚያስችለው ስሞች እንዲፈጠሩ ነው በ ማስኬጃ-ጊዜ ውስጥ: ለምሳሌ:

"ጽሁፍ ማረሚያ1" ለ "ጽሁፍ ማረሚያ5" በ ዙር ውስጥ ለ መፍጠር አምስት መቆጣጠሪያ ስሞች

የ ስህተት ኮዶች:

5 ዋጋ የሌለው የ አሰራር ጥሪ

12 ተለዋዋጭ አልተገለጸም

14 ዋጋ የሌለው ደንብ

52 ዋጋ የሌለው የ ፋይል ስም ወይንም የ ፋይል ቁጥር

57 የ አካል I/O ስህተት