[Resolvido] Ajuda com código de login

Olá amigos,
tenho um sistema de login  e gostaria que ao inserir um login errado, ele limpasse os campos de login e senha e colocasse o foco no campo de login.

estou usando este código:

Código:

Private Sub Form_Open(Cancel As Integer)
Me.Rótulo32.Visible = False
End Sub
Private Sub Login_Click()
If Not IsNull(caixalogin) And Not IsNull(caixasenha) Then
        If verificaLogin(caixalogin, caixasenha) Then
            DoCmd.Close
            DoCmd.OpenForm "frmPrincipal"
        Else
            Me.Rótulo32.Visible = True
            Me.caixalogin.SetFocus
        End If
    End If
End Sub

Private Sub Sair_Click()
    DoCmd.Quit
End Sub


só está faltando a parte de limpar os campos

Alguém?

tenta algo assim:

Else

caixalogin.value = ""
caixasenha.value = ""

Me.Rótulo32.Visible = True
Me.caixalogin.SetFocus



End If
End If

Obrigado amigo, funcionou perfeitamente!