Contents

# 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 ཡིག་རྟགས་ཕྲེང་བ་ཞིག་འཁོར་བསྐྱོད་གཏན་དུ་འཁེལ་བའི་སྐབས་བྱ་ཡུལ་མིང་ལ་བེད་སྤྱོད་པ་

### Error codes:

5 ནུས་མེད་ཀྱི་བརྒྱུད་རིམ་འཁོར་སྤྱོད་

12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་