Set Statement

འགྱུར་ཚད་དམ་གཏོགས་གཤིས་འདྲེན་སྤྱོད་བྱ་ཡུལ་བཀོད་སྒྲིག

བརྡ་འཕྲོད་

Set ObjectVar = Object

ཁུགས་གྲངས་

ObjectVar བྱ་ཡུལ་གྱི་འགྱུར་ཚད་དམ་གཏོགས་གཤིས་འདྲེན་སྤྱོད་བྱ་དགོས་པ་

Object འགྱུར་ཚད་དམ་གཏོགས་གཤིས་འདྲེན་སྤྱོད་བྱ་ཡུལ།

Nothing - བྱ་ཡུལ་ Nothing ཉིད་འགྱུར་ཚད་ག་གེ་མི་ཞིག་ལ་གཏན་འཁེལ་གྱིས་སྔོན་མའི་གཏན་འཁེལ་རྩིས་མིད་བཏང་བ་

དཔེ་གཞི་

Sub ExampleSet
Dim oDoc As Object
    Set oDoc = ActiveWindow
    Print oDoc.Name
End Sub