Inicio de sesion en vb 2010 usando sql2008

[HaverRamirez]

Mira

asi leer un dataread
While leer.Read()
MSGBOX(String.Format("{0}, {1}", _
leer(0), leer(1)))
End While

ahora para verificar si tiene un valor le das
if leer.hasRows = true then
"EL USUARIO EXISTE
else
"ERROR"
END IF

estas lineas estan de mas, porque como te digo, si existe en la base, devolvera una fila, porque son equivalentes los campos del textbox con las columnas de la tabla de sql
si regreso un valor es porque son IGUALES entonces ya no necesitas hacer esto...
If TxtUsuario.Text = leer(0).ToString Then 'este campo si lo lee bien
If TxtContraseña.Text = leer(1).ToString Then 'este es el que me causa problemas