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 函数提供环境字符串表中语句 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 包含整数，则返回在环境字符串表中占据该数值位置的字符串。 在这种情况下， 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 函数提供环境字符串表中语句 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 包含整数，则返回在环境字符串表中占据该数值位置的字符串。 在这种情况下， Environ 返回所有文本，包括环境变量的名称。 如果指定位置中没有环境字符串， Environ 则返回零长度字符串。

重要

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

另请参阅

• ArgumentException
• Visual Basic Run-Time 库成员