Interaction.Environ 方法

定義

命名空間:
Microsoft.VisualBasic
組件:
Microsoft.VisualBasic.dll

回傳與作業系統環境變數相關的字串。

多載

名稱 Description
Environ(String)

回傳與作業系統環境變數相關的字串。
Environ(Int32)

回傳與作業系統環境變數相關的字串。

Environ(String)

回傳與作業系統環境變數相關的字串。

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 則回傳一個零長度的字串。

Important

該 Environ 函式需要環境權限，這可能會影響部分信任情況下的執行。 欲了解更多資訊，請參閱SecurityPermission及代碼存取權限。

另請參閱

適用於

Environ(Int32)

回傳與作業系統環境變數相關的字串。

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 則回傳一個零長度的字串。

Important

該 Environ 函式需要環境權限，這可能會影響部分信任情況下的執行。 欲了解更多資訊，請參閱SecurityPermission及代碼存取權限。

另請參閱

適用於