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 | num } )
Gli argomenti della sintassi della funzione Dispsp sono i seguenti:
| Argomento | Descrizione |
|---|---|
| envstring | Facoltativo. Espressione stringa contenente il nome di una variabile di ambiente. |
| Numero | 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. |
Osservazioni
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, L'erma 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 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