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.

FindPropertyObject

བརྡ་འཕྲོད་

FindObject( ObjName As String )

ཁུགས་གྲངས་

ObjName ཡིག་རྟགས་ཕྲེང་བ་ཞིག་འཁོར་བསྐྱོད་གཏན་དུ་འཁེལ་བའི་སྐབས་བྱ་ཡུལ་མིང་ལ་བེད་སྤྱོད་པ་