Início
Rondineli 4/5/2021, 18:25Estou 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?
Alguém sabe se tem um código?
3 participantes
Mensagem no Formulario
Rondineli- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 6
Registrado : 17/07/2015
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3492
Registrado : 13/12/2016
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":
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
Seja bem-vindo ao fórum !
No modo design, na Folha de Propriedades do formulário, clique nos 3 pontinho do evento "No Timer":
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
.................................................................................
Marcar tópico como Resolvido: clique aqui Postar anexos no fórum: clique aqui 
Sistemas e Tecnologia Ltda
Rondineli gosta desta mensagem
luissiscone- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 184
Registrado : 16/02/2011
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.
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- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 184
Registrado : 16/02/2011
Desculpa, não percebi que nosso amigo Alexandre Fim já havia respondido...
Mas fica ai mais uma dica...
Mas fica ai mais uma dica...
Alexandre Fim gosta desta mensagem
Rondineli- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 6
Registrado : 17/07/2015
luissiscone
Valeu mesmos assim
pela sua atenção
Valeu mesmos assim
pela sua atenção
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3492
Registrado : 13/12/2016
Sem problemas Luis...relaxa...acho que postamos juntos.
O importante é ajudar nosso novo membro do fórum.
[]'s
FIM
O importante é ajudar nosso novo membro do fórum.
[]'s
FIM
.................................................................................
Marcar tópico como Resolvido: clique aqui Postar anexos no fórum: clique aqui Sistemas e Tecnologia Ltda
Rondineli- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 6
Registrado : 17/07/2015
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
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
Cadastro de usuario.jpg - Você não tem permissão para fazer download dos arquivos anexados.
- (33 Kb) Baixado 12 vez(es)
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3492
Registrado : 13/12/2016
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:
E vai exibir:
Espero ter ajudado.
Boa sorte
[]'s
FIM
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:
Espero ter ajudado.
Boa sorte
[]'s
FIM
.................................................................................
Marcar tópico como Resolvido: clique aqui Postar anexos no fórum: clique aqui Sistemas e Tecnologia Ltda
Rondineli gosta desta mensagem