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