Visual Basic - AYUDA URGENTE: INICIAR SESION CON PASSWORD

HOLA A TODOS LOS FANÁTICOS DE VISUAL BASIC, TENGO UN PROBLEMO QUE NECESITO CORREGIR URGENTEMENTE. TENGO UNA BASE DE DATOS EN ACCESS, LA CUAL LA UTILIZO EN VISUAL BASIC 6.0, Y PARA TENER ACCESO A ELLA NO TENGO NI UN PROBLEMA,. MI SISTEMA CONTIENE UN INICIO DE SESIÓN QUE PIDE NOMBRE DE USUARIO Y SU CORRESPONDIENTE PASSWORD, DICHOS DATOS SE ENCUENTRAN EN LA TABLA "EMPLEADO" COMO "NomEmp" Y "CveEmp", DONDE NomEmp ES EL NOMBRE DEL USUARIO Y CveEmp ES EL PASSWORD. EL CÓDIGO QUE UTILIZO ES EL SIGUIENTE: AL PRESIONAR EL BOTON "BtnAcp"

Private Sub BtnAcp_Click()
Set DB = New Connection
DB.CursorLocation = adUseClient
DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\MiBase.mdb"
Set DBID = New Recordset
DBID.Open "SELECT * FROM Empleado where NomEmp ='" & TxtEmp.Text & "'", DB, adOpenStatic, adLockOptimistic
If DBID.EOF Then
MsgBox "No hay usuarios con ese nombre"
TxtEmp.SetFocus
Else
If DBID(0) = UCase(Password.Text) Then
MsgBox "Usuario Identificado", vbInformation, "Contraseña"
Else
MsgBox "Contraseña incorrecta", vbCritical, "Contraseña"
Password.SetFocus
End If
End If
DBID.Close
Set DBID = Nothing
End Sub

EL PROBLEMA CONSISTE EN QUE AL INTRODUCIR EL NOMBRE DE USUARIO SÍ LO IDENTIFICA, PERO SIEMPRE LA CONTRASEÑA ES INCORRECTA SIENDO LA MISMA QUE SE ENCUENTRA EN LA BASE DE DATOS. ES MUY EXTRAÑO PORQUE EL MISMO CÓDIGO LO HE UTILIZADO EN OTROS SISTEMAS, CON ACCESS Y SQL SERVER, Y NO ME HA DADO PROBLEMAS......

ALGUIEN PUEDE AYUDARME?PLEASE
ESTOY DESESPERADO, NO SÉ QUÉ PASA
NECESITO AYUDA ¡¡¡¡¡¡URGENTEMENTE!!!!!!!
.....GRACIAS

Tu codigo esta correcto solamente cuando haces la comparacion del password agregale un Trim por que muchas veces por espacio en blanco ya no es igual, pruebalo y luego me dices:
If UCase(Trim(DBID(0))) = UCase(Trim(Password.Text)) Then
MsgBox "Usuario Identificado", vbInformation, "Contraseña"
Else
MsgBox "Contraseña incorrecta", vbCritical, "Contraseña"
Password.SetFocus
End If

TE AGRADEZCO BASTANTE. LO HICE DE OTRA FORMA, SIMPLEMENTE LE QUITÉ EL UCase Y ME FUNCIONÓ CORRECATAMENTE, ESPERANDO QUE NO HAYA NINGÚN ERROR, DE CUALQUIER FORMA PROBARÉ TU CÓDIGO.

GRACIAS
SALUDOS