Проблема входа в MS Access

Question

Ниже представлена ​​программа vba для авторизации пользователей для входа в базу данных ms access. Я пытаюсь исправить приведенный ниже код, и я не понимаю, где проблема с приведенным ниже кодом VBA. Отладчик в программе выделен желтым выделенным ниже кодом. Может кто-нибудь помочь мне понять, в чем проблема.

Private Sub cmdLogin_Click()
Dim lngUserID As Long
    lngUserID = Nz(DLookup("UserID", _
    "tblUser", "username = '" _
    & Me!cbousername _
    & "' AND Password = '" _
    & Me!txtPassword & "'"), 0)
    If lngUserID = 0 Then
        MsgBox "Username and/or password are incorrect."
        Me!txtPassword.SetFocus
    Else
        MsgBox "Registration successful!"
        OptionSetting "CurrentUserID", CStr(lngUserID)
        DoCmd.Close acForm, Me.Name
        DoCmd.OpenForm "Homepage"
    End If
      SetWebControlAsIE9
    ChangeWebControlFeature
END SUB

Выделенный код выделен желтым цветом отладчиком

 lngUserID = Nz(DLookup("UserID", _
    "tblUser", "username = '" _
    & Me!cbousername _
    & "' AND Password = '" _
    & Me!txtPassword & "'"), 0)