Início
Wilson90 9/6/2017, 18:04Olá a todos!
Tenho um projecto e gostaria de saber como colocar saudação no formulário ao abrir (Bom dia, boa tarde ou boa noite)?
Tenho um projecto e gostaria de saber como colocar saudação no formulário ao abrir (Bom dia, boa tarde ou boa noite)?
2 participantes
[Resolvido]Formulário Saudação
Wilson90- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 59
Registrado : 19/10/2015
thiagomcosta- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 377
Registrado : 23/01/2017
Se for uma mensagem ao abrir um determinado formulário, pode colocar o codigo abaixo no evento "Ao abrir" do formulario.
- Código:
Sub Saudacao()
Dim vHoraAgora As Date
vHoraAgora = Time
If vHoraAgora < #12:00:00 PM# Then
MsgBox "Boa dia!"
ElseIf vHoraAgora < #6:00:00 PM# Then
MsgBox "Bom tarde!"
Else
MsgBox "Boa noite!"
End If
End Sub
Wilson90- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 59
Registrado : 19/10/2015
Valeu... Funcionou
Tópicos semelhantes
» [Resolvido]Botão para abrir formulário no registro corrente do formulário anterior
» [Resolvido]Como faço um formulario de saudação?
» [Resolvido]Saudação no sistema!
» [Resolvido]Mensagem de saudação na tela de inicialização do access
» [Resolvido]Abrir Formulário em Edição ou Novo conforme Dados de outro Formulário
» [Resolvido]Como faço um formulario de saudação?
» [Resolvido]Saudação no sistema!
» [Resolvido]Mensagem de saudação na tela de inicialização do access
» [Resolvido]Abrir Formulário em Edição ou Novo conforme Dados de outro Formulário