Come leggere le variabili di ambiente in VB6

Le variabili d'ambiente sono gestiti dal sistema operativo Windows . Le variabili d'ambiente possono essere usati in script o programmi di Visual Basic per fare riferimento a una directory standard che potrebbe essere diverso da una macchina all'altra. Ad esempio , la variabile d'ambiente " PATH " sarà probabilmente diverso su ogni computer. " Apparato radicale " è un'altra variabile di ambiente che è diverso per ogni sistema operativo. Ci sono anche le variabili d'ambiente predefinite come " Data" e "TIME ". Applicazioni VB possono leggere le variabili d'ambiente con la funzione " Environ " . Istruzioni
1

Creare un nuovo progetto Visual Basic EXE standard . Un form denominato " Form1 " viene creato per impostazione predefinita .
2

dichiarare le variabili locali in caso di carico " Form1 " . Avrete bisogno di un numero intero , un valore booleano e una stringa che contiene il valore della variabile di ambiente .

Dim i as Integer

Dim bFound come booleano

Dim sEnvValue as String
3

la variabile "i" uguale a uno. Avanti, leggere la variabile d'ambiente in una posizione nell'indice e conservarlo in " sEnvValue . "

SEnvValue = Environ (i ) economici 4

ciclo su tutte le variabili di ambiente fino a quando non trovare quello che stai cercando. Farlo con una dichiarazione "Mentre " . Questo codice imposta " bFound " su true se la variabile d'ambiente " PATH " si trova .

Mentre Non bFound E sEnvValue < > " "

Ucase (Sinistra ( sEnvValue , 5) ) = " PATH = " Allora

bFound = True

Else

i = i + ​​1

sEnvValue = Environ (i ) per

End If Wend

la funzione " Ucase " converte " sEnvValue " per tutto maiuscolo , perché il confronto è case sensitive . Se " PATH " non viene trovato, leggere il seguente variabile d'ambiente fino a quando abbiamo letto tutti.
5

Controllare il valore di " bFound " per determinare che cosa passi per eseguire prossimo . Ora abbiamo il valore della variabile d'ambiente " PATH " che si trova in " sEnvValue " e in grado di analizzarlo , visualizzarlo , inserirlo in una tabella , scrivere in un file o di qualsiasi altra azione che normalmente prendere con una variabile stringa .

• Come utilizzare una funzione Somma in VB.net 
• Come utilizzare i riferimenti per un VB6