Verificar si el archivo existe

If File.Exists(Directory.GetCurrentDirectory & "\" & archivo) Then
Dim sr As New StreamReader(Directory.GetCurrentDirectory & "\" & archivo)
sr.Close()
sr.Dispose()
Else
' El archivo no se encuentra
End If

Si el archivo no existe

If Not File.Exists() Then

End If