Environ Function

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

བརྡ་འཕྲོད་


Environ (Environment As String)

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

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