Galera, Preciso saber como é a linha de código do comando Filter (Filtrar) no VB usando conexão ADO (DAO). está complicado, não estou conseguindo faze-lo. A estrutura está assim : Private Sub Command4_Click() Dim str As String adcUsu.Recordset.MoveFirst str = InputBox("Qual nome deseja procurar ?", "Localizar") If str <> "" Then adcUsu.Recordset.Filter "usuario like '" & str & "%'", , adSearchForward **====>> Não sei se é assim !!!!!!! If adcUsu.Recordset.EOF Then adcUsu.Recordset.MoveFirst MsgBox "Não foi encontrado nenhum registro com o nome : " & str & " !", , "Localizar" End If End If End Sub Eu fiz assim, mas dá erro e o nome não é localizado ..... Alguém me ajuda, por favor ! OBS : SE SOUBEREM, MEMNADAR O COMANDO DEPOIS PARA RETIRAR O FILTRO. Desde já agradeço ! []'s Highlander