
15/07/2005, 13:26
|
 | | | Fecha de Ingreso: abril-2004 Ubicación: 62º 06' 18" O / 33º 07' 47" S
Mensajes: 331
Antigüedad: 21 años Puntos: 1 | |
Colocá un Timer con la propiedad Interval=1000
Y dentro del evento Timer del control pone:
Private Sub Timer1_Timer()
lblHora.Caption=Time
lblHora.Refresh
End Sub |