ACQUISIRE TUTTE LE IMPOSTAZIONI SET (environment)
La configurazione del sistema operativo fa uso di variabili d''ambiente un tempo molto utilizzate dai programmatori DOS, ma anche oggi può essere importante conoscere i loro valori.
Per poter acquisire tali valori si utilizza la funzione Environ passandole un parametro numerico in base 1 come nel seguente esempio, che carica in una ListBox tutte le variabili dell'Enviroment :
CODICE VISUAL BASIC / VB6
Private Sub CaricaVariabiliEnviroment()
Dim x As Integer
x=1
While Environ(x) <> ""
List1.AddItem Environ(x)
x=x+1
Wend
End Sub