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

2 participantes

    Pedir um campo sempre que abre o formulário.

    avatar
    kbsao5
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 07/02/2017

    Pedir um campo sempre que abre o formulário. Empty Pedir um campo sempre que abre o formulário.

    Mensagem  kbsao5 16/3/2021, 11:17

    Olá pessoal, bom dia.
    Apesar de antigo no forum, tenho pouco conhecimento em access.
    Estou com uma dúvida.
    Eu uso o access para fazer um kit de documentos ao paciente (receita, atestado, declaração de isolamento do covid e tals)
    tenho campos como nome do paciente, inicio dos sintomas, etc..
    minha dúvida é a seguinte... Eu gostaria de adicionar dois campos, nome do médico e CRM, mas estes devem ser preenchidos sempre que se abrir o formulário e deve constar em todos os dados inseridos até o formulário ser fechado.
    tem como ?
    obrigado
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Pedir um campo sempre que abre o formulário. Empty Re: Pedir um campo sempre que abre o formulário.

    Mensagem  Alexandre Neves 16/3/2021, 13:54

    Boa tarde e bem-vindo ao fórum
    No acontecimento AoAbrir do formulário coloque código para preencher tais controlos
    TxtNomeMedico=inputbox("Introduza o nome do médico.")
    TxtCRM=inputbox("Introduza o CRM.")


    .................................................................................
    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

    kbsao5 gosta desta mensagem

    avatar
    kbsao5
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 07/02/2017

    Pedir um campo sempre que abre o formulário. Empty Re: Pedir um campo sempre que abre o formulário.

    Mensagem  kbsao5 16/3/2021, 16:30

    ele agora pede o dado, mas não preenche o campo.
    e queria que esse campo ficasse ativo e sempre fosse o mesmo, mantendo-se mesmo após clicar para um novo registro.
    mandei o modelo ai
    o nome
    Anexos
    Pedir um campo sempre que abre o formulário. AttachmentDatabase1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.1 Mb) Baixado 5 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Pedir um campo sempre que abre o formulário. Empty Re: Pedir um campo sempre que abre o formulário.

    Mensagem  Alexandre Neves 16/3/2021, 17:02

    Crie variáveis globais para manter enquanto a bd estiver aberta
    varNomeMedico=inputbox("Introduza o nome do médico.")
    varCRM=inputbox("Introduza o CRM.")

    em cada abertura de formulário que pretende preeencher, no acontecimento AoAbrir do formulário coloque código para preencher tais controlos
    TxtNomeMedico=inputbox("Introduza o nome do médico.")
    TxtCRM=inputbox("Introduza o CRM.")

    se não funcionar, disponibilize bd com dados significativos


    .................................................................................
    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

      Data/hora atual: 21/9/2021, 03:30