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

    Mensagem no Formulario

    Rondineli
    Rondineli
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 17/07/2015

    Mensagem no Formulario Empty Mensagem no Formulario

    Mensagem  Rondineli 4/5/2021, 18:25

    Estou com um Formulário e nele eu coloquei uma mensagem em Texto, gostaria que esta mensagem sumisse após alguns segundos.
    Alguém sabe se tem um código?
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  Alexandre Fim 4/5/2021, 19:09

    Olá Rondineli,

    Seja bem-vindo ao fórum !

    No modo design, na Folha de Propriedades do formulário, clique nos 3 pontinho do evento "No Timer":

    Mensagem no Formulario Timer10


    Ao abrir o código do procedimento, coloque a seguinte instrução:

    [NomeDoSeuControle].Visible = False


    Não se esqueça de mudar o intervalo de tempo. Neste caso, eu mudei para 3000 (equivalente 3 segundos). Ai vc coloca o intervalo que for necessário.

    Espero ter ajudado.

    []'s

    FIM




    .................................................................................
    Mensagem no Formulario Setinf11
    Sistemas e Tecnologia Ltda

    Rondineli gosta desta mensagem

    luissiscone
    luissiscone
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 178
    Registrado : 16/02/2011

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  luissiscone 4/5/2021, 19:12

    Rondineli, boa tarde.

    Botão de comando.

    CreateObject("WScript.Shell").Popup "Sua mensagem aqui", 3, "Titulo da mensagem aqui"


    Espere 3 segundos...(pode aumentar o tempo: 4,5,6,etc.)


    Espero ter ajudado.
    luissiscone
    luissiscone
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 178
    Registrado : 16/02/2011

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  luissiscone 4/5/2021, 19:15

    Desculpa, não percebi que nosso amigo Alexandre Fim já havia respondido...

    Mas fica ai mais uma dica...

    Alexandre Fim gosta desta mensagem

    Rondineli
    Rondineli
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 17/07/2015

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  Rondineli 4/5/2021, 19:19

    luissiscone
    Valeu mesmos assim
    pela sua atenção
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  Alexandre Fim 4/5/2021, 19:22

    Sem problemas Luis...relaxa...acho que postamos juntos.
    O importante é ajudar nosso novo membro do fórum.

    []'s

    FIM


    .................................................................................
    Mensagem no Formulario Setinf11
    Sistemas e Tecnologia Ltda
    Rondineli
    Rondineli
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 17/07/2015

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  Rondineli 4/5/2021, 20:01

    Alexandre Fim
    para o primeiro formulário deu certo
    [NomeDoSeuControle].Visible = False

    mais tenho outro formulário de cadastro que coloquei uma mensagem ao clicar em gravar um novo
    usuário aparece a mensagem usuário cadastrado com sucesso,
    gostaria que ela também sumisse apos alguns segundos
    Anexos
    Mensagem no Formulario AttachmentCadastro de usuario.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (33 Kb) Baixado 8 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    Mensagem no Formulario Empty Re: Mensagem no Formulario

    Mensagem  Alexandre Fim 4/5/2021, 20:37

    Rondineli,

    Na Mensagem nº1 você mencionou que a a mensagem para o usuário deveria sumir depois de alguns segundos, e que usamos a propriedade "Timer" do formulário.
    Acredito que o uso do Timer é desnecessário.

    Quando vc clicar no comando para incluir novo usuário, coloque no código do botão:

    [NomeDoSeuRotuloNoFormulario].Caption = Empty

    Quando vc clicar no comando "Salvar", coloque o seguinte código no evento do botão:

    [NomeDoSeuRotuloNoFormulario].Caption = "Usuário cadastrado com sucesso!"


    A forma mais comum de informar o usuário seriam as mensagens comuns.

    No botão Salvar, inclua a seguinte instrução:
    Código:

          MsgBox "Usuário cadastrado com sucesso.", vbInformation, "Mensagem"

    E vai exibir:
    Mensagem no Formulario Msg_us10




    Espero ter ajudado.

    Boa sorte

    []'s

    FIM















    .................................................................................
    Mensagem no Formulario Setinf11
    Sistemas e Tecnologia Ltda

      Data/hora atual: 6/12/2021, 17:29