Interaction.Environ Method

Source:

Interaction.vb

Source:

Interaction.vb

Source:

Interaction.vb

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

public static string Environ (string? Expression);

public static string Environ (string Expression);

static member Environ : string -> string

Public Function Environ (Expression As String) As String

Parameters

Returns

The string associated with an operating-system environment variable.

Exceptions

Examples

This example uses the Environ function to supply the entry number and length of the PATH statement from the environment-string table.

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

Remarks

If Expression contains a string, the Environ function returns the text assigned to the specified environment string - that is, the text following the equal sign (=) in the environment-string table for that environment variable. If the string in Expression cannot be found in the environment-string table, a zero-length string ("") is returned.

If Expression contains an integer, the string occupying that numeric position in the environment-string table is returned. In this case, Environ returns all of the text, including the name of the environment variable. If there is no environment string in the specified position, Environ returns a zero-length string.

See also

• ArgumentException
• Visual Basic Run-Time Library Members

Source:

Interaction.vb

Source:

Interaction.vb

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

Parameters

Returns

The string associated with an operating-system environment variable.

Exceptions

Examples

This example uses the Environ function to supply the entry number and length of the PATH statement from the environment-string table.

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

Remarks

If Expression contains a string, the Environ function returns the text assigned to the specified environment string - that is, the text following the equal sign (=) in the environment-string table for that environment variable. If the string in Expression cannot be found in the environment-string table, a zero-length string ("") is returned.

If Expression contains an integer, the string occupying that numeric position in the environment-string table is returned. In this case, Environ returns all of the text, including the name of the environment variable. If there is no environment string in the specified position, Environ returns a zero-length string.

See also

• ArgumentException
• Visual Basic Run-Time Library Members