MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    [Resolvido]Encontrar registo começado por

    avatar
    Chaparro1973
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 8
    Registrado : 28/11/2023

    [Resolvido]Encontrar registo começado por Empty [Resolvido]Encontrar registo começado por

    Mensagem  Chaparro1973 14/12/2023, 10:50

    Boas
    Estou a usar este código para procurar um registo:

    Private Sub Procura_Nome_Click()
      Dim criterio As String

      resposta = InputBox("Escreva o nome a procurar", "Procura")
       If StrPtr(resposta) = 0 Then
          MsgBox ("User canceled!")
       Else
          If resposta = vbNullString Then
             MsgBox ("Não posso procurar por nada")
          Else
             criterio = "[Nome] Like '" & resposta & "'"
             Clientes_RS.FindFirst (criterio)
             If Clientes_RS.NoMatch Then
                MsgBox ("Não encontrado")
             Else
                Preencher_dados
             End If
          End If
       End If
    End Sub

    Ate que funciona, mas não é bem como quero.
    Pretendia que procurasse os nomes começados por 'resposta', mas apenas encontra os que forem iguais a 'resposta'
    Podem ajudar-me por favor?


    Última edição por Chaparro1973 em 14/12/2023, 14:25, editado 1 vez(es) (Motivo da edição : adicionar base de dados)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3218
    Registrado : 13/12/2016

    [Resolvido]Encontrar registo começado por Empty Re: [Resolvido]Encontrar registo começado por

    Mensagem  Alexandre Fim 14/12/2023, 12:50

    Olá,

    Para ficar mais rápido e fácil de resolver, envie seu bd, somente objetos (tabelas/consultas/formulário e etc.) envolvidos no problema, para análise e solução.

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Encontrar registo começado por Setinf11
    Sistemas e Tecnologia Ltda
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Encontrar registo começado por Empty Re: [Resolvido]Encontrar registo começado por

    Mensagem  Alexandre Neves 14/12/2023, 22:15

    Boa noite
    substitua
    criterio = "[Nome] Like '" & resposta & "'"
    por
    criterio = "[Nome] Like '" & resposta & "*'"


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    Chaparro1973
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 8
    Registrado : 28/11/2023

    [Resolvido]Encontrar registo começado por Empty Re: [Resolvido]Encontrar registo começado por

    Mensagem  Chaparro1973 15/12/2023, 11:00

    Boas

    Obrigado pela atenção

    Conteúdo patrocinado


    [Resolvido]Encontrar registo começado por Empty Re: [Resolvido]Encontrar registo começado por

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/5/2024, 06:40