Miljø variabler vedligeholdes af Windows-operativsystemet. Miljøvariabler kan bruges i scripts eller Visual Basic programmer til at referere til en standard mappe , der kunne være forskellig fra den ene maskine til den næste. For eksempel vil den " PATH " miljøvariablen sandsynligvis være forskellig på hver computer. "SYSTEM ROOT " er et andet miljø variabel, der er forskellig for hvert operativsystem . Der er også foruddefinerede miljøvariabler såsom "DATE " og " TIME ". VB programmer kan læse miljøvariabler med " Environ "-funktion. Instruktioner
1
Opret en ny standard-EXE Visual Basic projekt. En form navnet " Form1 " oprettes som standard .
2
Erklær lokale variabler i " Form1 " belastning begivenhed. Du skal bruge et heltal, en boolsk og en streng til at holde værdien af miljøvariablen.
Dim i As Integer
Dim bFound som boolsk
Dim sEnvValue som String
3
Sæt "i " variable svarende til én. Dernæst læses miljøvariablen ved position én i indekset og gemme det i " sEnvValue . "
SEnvValue = Environ ( i)
4
Loop gennem alle miljøvariabler indtil du finde det, du søger efter. Gør dette med en "Mens " erklæring . Denne kode sætter " bFound " til sand , hvis " PATH " miljøvariablen er placeret.
Ikke bFound OG sEnvValue < > " "
p Hvis ucase (Venstre ( sEnvValue , 5) ) = " PATH =" Så
bFound = Sand
Else
i = i + 1
sEnvValue = Environ ( i)
< p> End If
Wend
" ucase "-funktionen konverterer " sEnvValue " til alle store bogstaver , fordi sammenligningen er små bogstaver. Hvis " PATH " ikke findes , skal du læse den næste miljøvariablen før vi har læst dem alle.
5.
Kontrollér værdien " bFound " for at afgøre, hvilke skridt der skal udføre næste . Vi har nu værdien af " PATH " miljøvariablen ligger i " sEnvValue " og kan tolke det , vise det, indsætte det i en tabel , så skriv det i en fil eller andre handlinger, du normalt ville tage med en streng variabel . < br >