codigos para el objeto time

sandro ken
29 de Enero del 2004
cuales son los codigos para el objeto time me muestre la hora actual del sistema

Bartolom
29 de Enero del 2004
Debes incluir un control timer en tu formulario, con las propiedades Interval=1000 y Enabled=True . Supongamos que el timer se llama Timer1 y la hora quieres mostrarla en una etiqueta llamada horaActual.
el código sería el siguiente:

Private Sub Timer1_Timer()
HoraActual.Caption = Format(Now, "HH:MM:SS, dddd dd - mmmm - yyyy")
End Sub

La última expresión dddd dd - mmmm - yyyy es opcional, es para que aparezca también la fecha.
Y por qué debe hacerse con un timer? Simplemente porque debe ocurrir que a cada evento del timer (cada 1 segundo) se muestre la hora actualizada, si no lo hicieras con timer, te quedaría la hora estática, hasta que refresques nuevamente el formulario.

Saludos!