Cómo usar vb para determinar si existe una carpeta

En la programación VB, a menudo es necesario determinar si un archivo existe para realizar las operaciones correspondientes. Esto se puede determinar mediante la siguiente declaración

Dir([nombre de ruta], [. Atributos como VbFileAttribute =vbNormal]) Como cadena

Explicación:

nombre de ruta: la ruta absoluta del archivo

Atributos: los atributos del archivo.

"[]" son opcionales.

Resultado: dir(file)="" significa que el archivo no existe, dir(file)lt;gt;"" significa que el archivo existe.

Por ejemplo, determine si existe c:wpswinwps.exe. Si existe, llámelo usando el siguiente código fuente:

if dir("c:wpswinwps.exe")lt;gt;"" then

shell "c: wpswinwps .exe"

end if

Pero si el archivo a determinar es un archivo oculto, la declaración anterior no puede determinarlo. En este caso, debe agregar los siguientes elementos opcionales .

Por ejemplo, para determinar si hay un archivo oculto command.com en el directorio raíz de la unidad C, utilice el siguiente código fuente:

if dir("c: command. com, vbhidden")lt ;gt;"" luego

msgbox "Encontrado c: command.com"

end if

Para determinar si la carpeta existe , utilice el siguiente código fuente:

dir (ruta de carpeta, vbDirectory) lt; gt ""

Por ejemplo, para determinar si la carpeta c:aaa está presente, el código es el siguiente:

if Dir("c:aaa", vbDirectory) lt;gt;"" entonces

msgbox "¡La carpeta: c:aaa existe!"

terminar si