[Resolvido]login com VB6 e access

Boa tarde a todos utilizadores e moderadores do Forum MaximoAccess.
Espero com o novo ano possamos ter mais novidades e que o ano 2012 seja um ano de sucesso para todos vós!

preciso fazer um formulário de login e senha em VB6 para conectar com um banco ACCESS

o utilizador digita seu nome na txtnome e sua senha na txtpassword...

como faço para verificar se o nome e senha são válidos??

preciso de uma explicação detalhada tipo... uma possivel consulta sql... como passar os textos digitados como parametro... como usar um recordset para trazer os dados...
obrigado a todos!!

Agradeço!

Funciona mais ou menos como no Access mesmo, com a diferença de que, no VB, você precisa colocar .Text depois do nome do campo:

If Me.NomeDoCampo.Text = ...

Olá pessoal bom dia, tenho uma dúvida em implementar o código para fazer pesquisa de dados em Visual Basic 6.0 com Access 2003.
Criei seis commd buton. (botão Novo, Apagar, Atualizar, Cancelar, Pesquisar e Fechar) já implementei o código em cinco botões mas o botão pesquisar da erro quando eu executo. Podem me dizer o que fiz de errado?
private sub cmdPesquisar_Click()
Dim strValorPesquisar As string
Dim varRegistoativo As Variant
With adodc1.recordset
varRegistoativo = .Bookmark
strValorPesquisar = Inputbox("Nome do aluno a pesquisar:", - "Pesquisa", "%") if strValorPesquisar <> "" _ O erro esta aqui nessa linha
then
.MoveFrist
.Find "Nome Like '*" & strValorPesquisar & "*'"
if .EOF _
then
Msgbox "O Registo não foi encontrado!", _
VbOkOnly, "Mensagem"
.Bookmark = varRegistoativo
end if
end if
end with
end sub

strValorPesquisar = InputBox("Nome do aluno a pesquisar:", " - Pesquisa", "%")
If strValorPesquisar <> "" Then


o traço junto da palavra pesquisar, não pode estar fora das aspas.