Nota: La funzione, il metodo, la proprietà o l'oggetto descritto in questo argomento è disabilitato se Microsoft Jet Expression Service è in esecuzione in modalità sandbox, che impedisce la valutazione delle espressioni potenzialmente pericolose. Per altre informazioni sulla modalità sandbox, cercare "modalità sandbox" nella Guida.
Restituisce la stringa associata a una variabile di ambiente del sistema operativo. Non disponibile con Macintosh
Sintassi
Idede( { envstring | numero } )
Gli argomenti della sintassi della funzione Dispsp sono i seguenti:
Argomento |
Descrizione |
envstring |
Facoltativo. Espressione stringa contenente il nome di una variabile di ambiente. |
num |
Facoltativo. Espressione numerica corrispondente all'ordine numerico della stringa di ambiente nella tabella stringa-ambiente. L'argomento num può essere qualsiasi espressione numerica, ma viene arrotondato a un numero intero prima della valutazione. |
Note
Se non è possibile trovare envstring nella tabella della stringa di ambiente, viene restituita una stringa di lunghezza zero (""). In caso contrario, Idede restituisce il testo assegnato alla stringa di envstring specificata; ovvero il testo che segue il segno di uguale (=) nella tabella stringa-ambiente per la variabile di ambiente.
Se si specifica num, verrà restituita la stringa che occupa tale posizione numerica nella tabella stringa-ambiente. In questo caso, Envron restituisce tutto il testo, inclusa envstring. Se nella posizione specificata non è presente una stringa di ambiente, L'intervallo restituirà una stringa di lunghezza zero.
Esempio
Nota: Gli esempi seguenti illustrano l'uso di questa funzione in un modulo di Visual Basic, Applications Edition (VBA). Per altre informazioni sull'uso di VBA, selezionare Riferimenti per sviluppatori nell'elenco a discesa accanto a Cerca e immettere uno o più termini nella casella di ricerca.
In questo esempio viene usata lafunzioneo per specificare il numero di voce e la lunghezza dell'istruzione PATH dalla tabella stringa dell'ambiente. Non disponibile con Macintosh.
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