Interaction.Environ 方法

定义

命名空间:

Microsoft.VisualBasic

程序集:

Microsoft.VisualBasic.Core.dll

返回与操作系统环境变量关联的字符串。

重载

Environ(String)	返回与操作系统环境变量关联的字符串。
Environ(Int32)	返回与操作系统环境变量关联的字符串。

Environ(String)

Source:

Interaction.vb

返回与操作系统环境变量关联的字符串。

public:
 static System::String ^ Environ(System::String ^ Expression);

public static string Environ (string? Expression);

static member Environ : string -> string

Public Function Environ (Expression As String) As String

参数

Expression

String

必需。 此表达式用于计算包含环境变量名称的字符串，或对应于环境字符串表中环境字符串的数字顺序的整数。

返回

String

与操作系统环境变量关联的字符串。

例外

ArgumentException

缺少 Expression。

示例

此示例使用 Environ 函数提供 environment-string 表中语句 PATH 的条目号和长度。

Sub tenv()
    Dim envString As String
    Dim found As Boolean = False
    Dim index As Integer = 1
    Dim pathLength As Integer
    Dim message As String

    envString = Environ(index)
    While Not found And (envString <> "")
        If (envString.Substring(0, 5) = "Path=") Then
            found = True
        Else
            index += 1
            envString = Environ(index)
        End If
    End While

    If found Then
        pathLength = Environ("PATH").Length
        message = "PATH entry = " & index & " and length = " & pathLength
    Else
        message = "No PATH environment variable exists."
    End If

    MsgBox(message)
End Sub

注解

如果 Expression 包含字符串，则 Environ 函数返回分配给指定环境字符串的文本-即，在环境变量的环境字符串表中 (=) 等号后面的文本。 如果在 environment-string 表中找不到 中的 Expression 字符串，则返回零长度字符串 (“”) 。

如果 Expression 包含整数，则返回在 environment-string 表中占据该数值位置的字符串。 在这种情况下， Environ 返回所有文本，包括环境变量的名称。 如果指定位置中没有环境字符串， Environ 则 返回长度为零的字符串。

重要

函数 Environ 需要环境权限，这可能会影响其在部分信任情况下的执行。 有关详细信息，请参阅 SecurityPermission 和代码访问权限。

另请参阅

• ArgumentException
• Visual Basic Run-Time 库成员

Environ(Int32)

Source:

Interaction.vb

返回与操作系统环境变量关联的字符串。

public:
 static System::String ^ Environ(int Expression);

public static string Environ (int Expression);

static member Environ : int -> string

Public Function Environ (Expression As Integer) As String

参数

Expression

Int32

必需。 此表达式用于计算包含环境变量名称的字符串，或对应于环境字符串表中环境字符串的数字顺序的整数。

返回

String

与操作系统环境变量关联的字符串。

例外

ArgumentException

缺少 Expression。

示例

此示例使用 Environ 函数提供 environment-string 表中语句 PATH 的条目号和长度。

Sub tenv()
    Dim envString As String
    Dim found As Boolean = False
    Dim index As Integer = 1
    Dim pathLength As Integer
    Dim message As String

    envString = Environ(index)
    While Not found And (envString <> "")
        If (envString.Substring(0, 5) = "Path=") Then
            found = True
        Else
            index += 1
            envString = Environ(index)
        End If
    End While

    If found Then
        pathLength = Environ("PATH").Length
        message = "PATH entry = " & index & " and length = " & pathLength
    Else
        message = "No PATH environment variable exists."
    End If

    MsgBox(message)
End Sub

注解

如果 Expression 包含字符串，则 Environ 函数返回分配给指定环境字符串的文本-即，在环境变量的环境字符串表中 (=) 等号后面的文本。 如果在 environment-string 表中找不到 中的 Expression 字符串，则返回零长度字符串 (“”) 。

如果 Expression 包含整数，则返回在 environment-string 表中占据该数值位置的字符串。 在这种情况下， Environ 返回所有文本，包括环境变量的名称。 如果指定位置中没有环境字符串， Environ 则 返回长度为零的字符串。

重要

函数 Environ 需要环境权限，这可能会影响其在部分信任情况下的执行。 有关详细信息，请参阅 SecurityPermission 和代码访问权限。

另请参阅

• ArgumentException
• Visual Basic Run-Time 库成员