Control Timer...
Hola, mi pregunta es la siguiente... Puedo a través de un control timer y un label presentar un formato de fecha completo (por ejemplo: 14 de julio de 2005).
Yo utilizo el siguiente código pero solo me presenta la fecha en formato corto (14/07/2005)
Cargo el intervalo
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub
Y llamo al caption del label junto con el timer
Private Sub Timer1_Timer()
lblFecha.Caption = Date
End Sub
Gracias de antemano
Yo utilizo el siguiente código pero solo me presenta la fecha en formato corto (14/07/2005)
Cargo el intervalo
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub
Y llamo al caption del label junto con el timer
Private Sub Timer1_Timer()
lblFecha.Caption = Date
End Sub
Gracias de antemano
1 respuesta
Respuesta de ppmapi
1
Necesitas utilizar la función Format
Prueba esto:
lblFecha.Caption = Format(Date, "dd ""de"" mmmm ""de"" yyyy")
Un saludo,
ppmapi
Prueba esto:
lblFecha.Caption = Format(Date, "dd ""de"" mmmm ""de"" yyyy")
Un saludo,
ppmapi
