Environ 函数

以字符串形式返回环境变量的值。环境变量取决于操作系统的类型。

语法:

Environ (环境 As String)

返回值:

字符串

参数:

环境: 要返回其值的环境变量。

错误代码:

5 无效的过程调用

示例:

Sub ExampleEnviron

Dim sTemp As String

    sTemp=Environ ("TEMP")

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

    MsgBox "'" & sTemp & "'" ,64,"临时文件目录:"

End Sub