Set Statement

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

བརྡ་འཕྲོད་

Set ObjectVar = Object

ཁུགས་གྲངས་

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

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

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

དཔེ་གཞི་

Sub ExampleSet

Dim oDoc As Object

    Set oDoc = ActiveWindow

    Print oDoc.Name

End Sub