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 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་12 འགྱུར་ཚད་མཚན་འཇོག་མ་བྱེད་པ་

14 ནུས་མེད་ཀྱི་ཞུགས་གྲངས་14 ནུས་མེད་ཀྱི་ཞུགས་གྲངས་

52 ནོར་བའི་ཡི་ཆའི་མིང་ངམ་ཨང་སྒྲིག་

57 སྒྲིག་ཆས་ལ་ I/O ནོར་འཁྲུལ་ཐོན་པ་57 སྒྲིག་ཆས་ལ་ I/O ནོར་འཁྲུལ་ཐོན་པ་