USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (Miscelâneas)

Título da Dica:  Programa que dá Bom Dia, Boa Tarde ou Boa Noite
Postada em 14/8/2000 por Webmaster      Clique aqui para enviar email para o autor  webmaster@vbweb.com.br
'No evento Form_Load() do Form principal:
Private Sub Form_Load()
  Me.Show
  If Time$ > "19:00:00" Then
    MsgBox "Boa noite e seja bem vindo!!!", _
           vbInformation
  ElseIf Time$ > "12:00:00" Then
    MsgBox "Boa tarde e seja bem vindo!!!", _
           vbInformation
  ElseIf Time$ > "00:00:00" Then
    MsgBox "Bom dia e seja bem vindo!!!", _
           vbInformation
  End If
End Sub

Assim, ele lhe dirá:
* "Bom dia e seja bem vindo!!!" - de manha
* "Boa tarde e seja bem vindo!!!" - de tarde
* "Boa noite e seja bem vindo!!!" - de noite
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página