Interaction.Environ Methode

Definition

Namespace:: Microsoft.VisualBasic

Assembly:: Microsoft.VisualBasic.dll

Wichtig

Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.

Gibt die Zeichenfolge zurück, die einer Betriebssystemumgebungsvariable zugeordnet ist.

Überlädt

Name	Beschreibung
Environ(String)	Gibt die Zeichenfolge zurück, die einer Betriebssystemumgebungsvariable zugeordnet ist.
Environ(Int32)	Gibt die Zeichenfolge zurück, die einer Betriebssystemumgebungsvariable zugeordnet ist.

Environ(String)

Gibt die Zeichenfolge zurück, die einer Betriebssystemumgebungsvariable zugeordnet ist.

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

Parameter

Expression: String

Required. Ausdruck, der eine Zeichenfolge auswertet, die den Namen einer Umgebungsvariable enthält, oder eine ganze Zahl, die der numerischen Reihenfolge einer Umgebungszeichenfolge in der Umgebungszeichenfolgentabelle entspricht.

Gibt zurück

String

Die Zeichenfolge, die einer Betriebssystemumgebungsvariable zugeordnet ist.

Ausnahmen

ArgumentException

Expression fehlt.

Beispiele

In diesem Beispiel wird die Environ Funktion verwendet, um die Eintragsnummer und länge der PATH Anweisung aus der Umgebungszeichenfolgentabelle bereitzustellen.

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

Hinweise

Wenn Expression eine Zeichenfolge enthalten ist, gibt die Environ Funktion den Text zurück, der der angegebenen Umgebungszeichenfolge zugewiesen ist, d. h. den Text nach dem Gleichheitszeichen (=) in der Umgebungszeichenfolgentabelle für diese Umgebungsvariable. Wenn die Zeichenfolge in Expression der Umgebungszeichenfolgentabelle nicht gefunden werden kann, wird eine leere Zeichenfolge ("") zurückgegeben.

Wenn Expression eine ganze Zahl enthalten ist, wird die Zeichenfolge zurückgegeben, die diese numerische Position in der Umgebungszeichenfolgentabelle einnimmt. Gibt in diesem Fall Environ den gesamten Text zurück, einschließlich des Namens der Umgebungsvariable. Wenn keine Umgebungszeichenfolge an der angegebenen Position vorhanden ist, Environ wird eine leere Zeichenfolge zurückgegeben.

Important

Die Environ Funktion erfordert eine Umgebungsberechtigung, die sich auf die Ausführung in teilweise vertrauenswürdigen Situationen auswirken kann. Weitere Informationen finden Sie unter SecurityPermission den Berechtigungen für den Codezugriff.

Weitere Informationen

Gilt für:

Environ(Int32)

Gibt die Zeichenfolge zurück, die einer Betriebssystemumgebungsvariable zugeordnet ist.

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

Parameter

Expression: Int32

Gibt zurück

String

Die Zeichenfolge, die einer Betriebssystemumgebungsvariable zugeordnet ist.

Ausnahmen

ArgumentException

Expression fehlt.

Beispiele

In diesem Beispiel wird die Environ Funktion verwendet, um die Eintragsnummer und länge der PATH Anweisung aus der Umgebungszeichenfolgentabelle bereitzustellen.

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

Hinweise

Important

Weitere Informationen

Gilt für:

Feedback

War diese Seite hilfreich?