[Ayuda] error en comprobacion de archivos

[darksitoo]

tengo un pequeño codigo para comprobar algunos archivos si estan en la pc o no.

es algo asi:

Código vb:

Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ' Directory
        If Directory.Exists("c:\windows\darksitoo\programs\vruhack\70\") Then
        Else
            MsgBox("0xF0A012 ""not move!""", MsgBoxStyle.Critical, "%TITLE_VRU%")
            Close()
        End If
        If File.Exists("c:\windows\explorer.exe") Then
            MsgBox("Existe", MsgBoxStyle.Information)
        Else
            MsgBox("No existe", MsgBoxStyle.Information)
        End If
 
    End Sub
 

pero me detecta error cuando llega a la linea "Close()". practicamente en ves de cerrarse el programa como cualquier otro me sale la sig ventana:

[pkj]

El fallo está en que "Close" se usa para cerrar ficheros abiertos para su lectura/escritura.
Para finalizar el programa se usa "End"

Saludos

[darksitoo]

wao men muchas gracias!