Environ, functie

Van toepassing op
Access voor Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Opmerking

De functie, methode, object of eigenschap die in dit onderwerp wordt beschreven, is uitgeschakeld als de Microsoft Jet Expression-service wordt uitgevoerd in de sandbox-modus, waardoor de evaluatie van mogelijk onveilige expressies wordt voorkomen. Zoek naar 'sandbox-modus' in de Help voor meer informatie over de sandboxmodus.

Deze functie geeft de tekenreeks als resultaat die is gekoppeld aan een omgevingsvariabele van het besturingssysteem. Niet beschikbaar voor de Mac.

Syntaxis

Environ( { envstring | number } )

De syntaxis van de functie Environ bevat de volgende argumenten:

Argument Beschrijving
omgevingsvar Optioneel. Een tekenreeksexpressie met de naam van een omgevingsvariabele.
getal Optioneel. Een numerieke expressie die overeenkomt met de numerieke positie van de omgevingstekenreeks in de tabel met omgevingstekenreeksen. Het argument getal kan elke numerieke expressie zijn, maar wordt afgerond op een geheel getal voordat het wordt geëvalueerd.

    

Opmerkingen

Als envstring niet kan worden gevonden in de tabel environment-string, wordt een tekenreeks met lengte nul ("") geretourneerd. Anders retourneert Environ de tekst die is toegewezen aan de opgegeven envstring; Dat wil gezegd, de tekst na het gelijkteken (=) in de tabel environment-string voor die omgevingsvariabele.

Als u een getal opgeeft, wordt de tekenreeks die deze numerieke positie in de omgevingsreekstabel inneemt, geretourneerd. In dit geval retourneert Environ alle tekst, inclusief envstring. Als er zich geen omgevingsreeks bevindt op de opgegeven positie, retourneert Environ een tekenreeks met de lengte nul.

Voorbeeld

Opmerking

In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.

In dit voorbeeld wordt de functie Environ gebruikt om het invoernummer en de lengte van de PATH instructie uit de omgevingsreekstabel op te geven. Niet beschikbaar voor de Mac.

Dim EnvString, Indx, Msg, PathLen    ' Declare variables.
Indx = 1    ' Initialize index to 1.
Do
    ' Get environment variable.
    EnvString = Environ(Indx)
    ' Check PATH entry.
    If Left(EnvString, 5) = "PATH=" Then
        ' Get length.
        PathLen = Len(Environ("PATH"))
        Msg = "PATH entry = " & Indx & " and length = " _
               & PathLen
        Exit Do
    Else
        ' Not PATH entry, so increment.
        Indx = Indx + 1
    End If
Loop Until EnvString = ""
If PathLen > 0 Then
    ' Display message.
    MsgBox Msg
Else
    MsgBox "No PATH environment variable exists."
End If