Cómo leer variables de entorno en VB6

Medio ambiente Las variables son mantenidas por el sistema operativo Windows. Medio ambiente Las variables 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, el "PATH" entorno de variables probablemente será diferente en cada equipo. "ROOT SYSTEM" es otro ambientevariable 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".

variables de entorno

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

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

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)

Recorrer todas las variables de entorno hasta que encuentre 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 =" A continuación,

bFound = True

Más

i = i + 1

sEnvValue = Medio (i)

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.

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.