Truco de Visual Basic 6.0 - Determinar si un fichero existe o no

En la programación de Visual Basic 6.0 alguna vez necesitaremos crear ficheros, y seguramente tendremos que conocer si este fichero existe o no.

Escriba el siguiente código:

(una de tanta maneras aparte de Dir$())

Private Sub Form_Load()

On Error GoTo Fallo

x = GetAttr("C:\Autoexec.bat")

MsgBox "El fichero existe."

Exit Sub

Fallo: MsgBox "El fichero no existe."

End Sub