Giusto per le sqlinjection, io userei una count e non un datareader se ti serve solo sapere se l'utente esiste:

dopo aver effettuato la connessione al db, partendo dall'assunto che hai importato:
System.Data.OleDbClient

Sub btnLogin_OnClick(Src As Object, E As EventArgs)
Dim myConnection As OleDbConnection
Dim myCommand As OleDbCommand
Dim intUserCount As Integer
Dim strSQL As String

strSQL = "SELECT COUNT(*) FROM tabella WHERE username='" & Replace("UserName", "'", "''") & "' AND password='" & Replace("Password", "'", "''") & "';"


myConnection = New OleDbConnection(.....i dati della tua connessione.....)


myCommand = New OleDbCommand(strSQL, myConnection)

myConnection.Open()
intUserCount = CType(myCommand.ExecuteScalar(), Integer)

....oppure.....

intUserCount = (int) myCommand.ExecuteScalar()

.....non mi ricordo il casti di un oggetto in vb.net .......

myConnection.Close()

.....QUI ti controlli se intUserCount è 1 o 0 con una if....


End sub


ciao
Scuba