Environ Function

ཡིག་རྟགས་ཕྲེང་བ་རྣམ་པ་ཐོག་ནས་ཁོར་ཡུག་འགྱུར་ཚད་ཀྱི་གྲངས་ཐང་དུ་ཕྱིར་ལོག་པ་ བཀོལ་སྤྱོད་མ་ལག་གི་རིགས་ནི་ཁོར་ཡུག་འགྱུར་ཚད་ལ་རགས་སུ།

བརྡ་འཕྲོད་

Environ (Environment As String)

ཕྱིར་ལོག་ཐང་

ཡིག་རྟགས་ཕྲེང་བ་

ཁུགས་གྲངས་

Environment དེའི་གྲངས་ཐང་གི་ཁོར་ཡུག་འགྱུར་ཚད་དུ་ཕྱིར་ལོག་པ།

Error codes:

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

དཔེ་གཞི་

Sub ExampleEnviron

Dim sTemp As String

    sTemp=Environ ("TEMP")

    If sTemp = "" Then sTemp=Environ("TMP")

    MsgBox "'" & sTemp & "'" ,64,"Directory of temporary files:"

End Sub