Set Statement

འགྱུར་ཅན་ཡང་ན་རྒྱུ་དངོས་གུ་དངོས་པོ་གཞི་བསྟུན་གཞི་སྒྲིག་འབདཝ་ཨིན།

ཚིག་སྦྱོར:

དངོས་པོ་ཝར་གཞི་སྒྲིག = དངོས་པོ།

ཚད་བཟུང་ཚུ་:

དངོས་པོ་ཝར་: འགྱུར་ཅན་ཅིག་ཡང་ནརྒྱུ་དངོས་དེ་དགོས་མཁོ་བའི་དངོས་པོ་གཞི་བསྟུན།

དངོས་པོ་: དངོས་པོ་དེ་འགྱུར་ཅན་ཡང་ན་རྒྱུ་དངོས་ཀྱིས་གཞི་བསྟུན་འབད་ནི་ལུ།

ག་ནི་ཡང་མེདཔ - འགན་སྤྲོད་དེ་ ག་ནི་ཡང་མེདཔ དངོས་པོ་ཅིག་འགྱུར་ཅན་ཅིག་ཧེ་མམ་གྱི་ལས་འགུལ་རྩ་བསྐྲད་གཏང་ནི་ལུ།

དཔེར་བརྗོད:

Sub ExampleSet

Dim oDoc As Object

    Set oDoc = ActiveWindow

    Print oDoc.Name

End Sub