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

བལྟ་ཡང་: འཚོལ་རྒྱུ་དངོས་ དངོས་པོ

ཚིག་སྦྱོར:

FindObject( ObjName As String )

ཚད་བཟུང་ཚུ་:

དངོས་པོ་མིང་: ཡིག་རྒྱུན་དེ་གིས་ཁྱོད་ཀྱིས་རཱན་ཊའིམ་ལུ་ཁ་བྱང་བཏགས་ནི་ཨིན་མི་དངོས་པོ་གི་མིང་དེ་གསལ་བཀོད་འབདཝ་ཨིན།