Las variables de entorno son mantenidos por el sistema operativo Windows. Las variables de entorno se pueden utilizar en scripts o programas de Visual Basic para hacer referencia a un directorio estándar que pueden ser diferentes de una máquina a otra. Por ejemplo , la variable de entorno " PATH" probablemente será diferente en cada equipo. "ROOT SYSTEM" es otra variable de entorno que es diferente para cada sistema operativo. También hay variables de entorno predefinidas, como "Fecha" y "TIME ". Aplicaciones VB pueden leer variables de entorno con la función " Medio " . Instrucciones
1

Crear un nuevo proyecto EXE estándar en Visual Basic . Un formulario denominado " Form1 " se crea de forma predeterminada .
2

Declarar variables locales en el " Form1 " evento de carga . Usted necesitará un número entero , un valor lógico y una cadena que contiene el valor de la variable de entorno .

Dim i como entero

bFound Dim como Boolean

sEnvValue dévil como secuencia
3

Establezca la variable " i" igual a uno. A continuación, lea la variable de entorno en la posición de uno en el índice y guárdelo en " sEnvValue . "

SEnvValue = Medio ( i )
4

Recorrer todas las variables de entorno hasta que encontrar el que usted está buscando. Haga esto con una declaración " While" . Este código establece " bFound " es verdadero si la variable de entorno " PATH" se encuentra .

Aunque no bFound Y sEnvValue < > ""

Si Ucase (Izquierda ( sEnvValue , 5 ) ) = " PATH = " Entonces

bFound = True

demás

i = i + 1

sEnvValue = Medio ( i )
< p> End If Wend

la función " Ucase " convierte " sEnvValue " a mayúsculas porque la comparación entre mayúsculas y minúsculas . Si no se encuentra " PATH" , lee la siguiente variable de entorno hasta que hemos leído todos.
5

Compruebe el valor de " bFound " para determinar los pasos a realizar a continuación. Ahora tenemos el valor de la variable de entorno " PATH" ubicado en " sEnvValue " y podemos analizarlo , mostrarla , insertarlo en una tabla, escribir en un archivo o cualquier otra acción que normalmente tomar con una variable de cadena .