SRick
|
LAVRAS
MG - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 12/05/2012 18:33 hs
Olá pessoal, estou com uma dúvida, que creio que seja simples, mas meus testes estão saindo errado, preciso fazer uma msgbox dessa forma: [Olá, hoje é 06 de maio de 2012 - domingo, agora são 21:30:45] Obrigado. Henrique |
|
|
|
|
|
Tiranossauro
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 12/05/2012 20:57 hs
Ai vai, bem braçal ....
dim vmes (13) as string
dim vSem(8) as string
vmes(1) = "janeiro"
vmes(2) = "janeiro"
vmes(3) = "janeiro"
vmes(4) = "janeiro"
vmes(5) = "janeiro"
vmes(6) = "janeiro"
vmes(7) = "janeiro"
vmes(8) = "janeiro"
vmes(9) = "janeiro"
vmes(10) = "janeiro"
vmes(11) = "janeiro"
vmes(12) = "janeiro"
vSem(1) = "Domingo"
vSem(2) = "Segunda-Feira"
vSem(3) = "Terça-Feira"
vSem(4) = "Quarta-Feira"
vSem(5) = "Quinta-Feira"
vSem(6) = "Sexta"
vSem(7) = "Sábado"
msgbox "[Olá, hoje é " & format(now, "dd") & " de " & vmes(format(now, "mm")) & " de " & format(now, "yyyy") & " - " & ArrayWD(Weekday(now))
|
|
|
|
Treze
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 15/05/2012 16:36 hs
bem simples
MsgBox "Olá hoje é " & Format(Date, "long date") & " agora são " & Time
|
|
|
|
SRick
|
LAVRAS
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 16/05/2012 01:52 hs
TREZE, obrigado, a proposíto, você anda sumido, você mudou o email?
Um abraço, do amigo
Henrique
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 16/05/2012 10:55 hs
Na realidade Henrique foi o hotmail que cancelou meu e-mail,e ando sumido por causa do trabalho que ta meio corrido.
a propósito para contatos pode enviar email para: marcelo-treze@hotmail.com
|
|
|
|
