Miembros: Mensajes: Temas: Online:
Ultimo Miembro:
Private Sub Timer1_Timer() Call refresca End Sub Private Sub refresca() hora = Now Label3.Caption = Format(hora, "hh:mm:ss dd-mmmm-yyyy") End Sub