Autor Tema: Re: Tiempo (Leído 1887 veces)

krlos02 · « **en:** Lunes 11 de Agosto de 2003, 17:53 »

hola a todos, qusiera hacer otra consulta..... estoy haciendo una aplicacion para un cyber y engo algunas dudas como hago para que el tiempo que una persona lleva usando el equipo aparezca en un campo de una grilla?... hasta ahora hice el "cronometro" pero no se como hacer para que me mustre el tiempo real... lo programe en un boton, pero me muestra el tiempo transcurrido hasta hacer click y yo quiero que, al momento de habilitar el equipo comince a correr el tiempo y este aparezca en la grilla....

chiaravel

NO comprendo mucho la diferencia de lo que esta haciendo a lo que queres que haga , pero basicamente lo tendrias que hacer usando el objeto timer.

Te envio un ejemplo que quizas te ayude.

Suerte

JKim

Hola!

Puedes utilizar el control Timer que viene con la VB. (Al abrir un nuevo proyecto standard aparece en el cuadro de herramientas).

Bien, este control produce un evento cada cierto tiempo x que tu le especifiques. Podrías hacer que cuando se produzca el evento actualices el valor del grill.

Saludos!

J.M.Movilla

Este ejemplo te presenta en pantalla el tiempo que le va quedando al usuario... Tú lo personalizarás para que presente minutos en lugar de segundos... Y cuando llegue a 0 podrás hacer que se desconecte automáticamente.

Saludos y suerte

krlos02

gracias chiaravel, eso era presisamente lo que queria... te pudo hacer algunas preguntas?... como puedo hacer para pasasrle la hora actual del sistema a un campo de un datagrid?.. como sumo esa hora con la que se me genero con el ejemplo que me diste?.. te agradezco por la ayuda... J.M. Movilla, gracias tambien por tu ejemplo, me servira para otra parte del proyecto si me puedes responder algunas de las preguntas anteriores te lo agradeceria tambien....

chiaravel

Hola, me alegra enormemente que te haya servido el ejemplo.

EN cuanto al DBGRID, yo por lo general no uso, asi que nuestro amigo Jose Maria Movilla seguramente te podra dar un buen consejo.

en cuanto a la suma de horas solo debes hacer lo siguiente....

dim suma as date

suma=time+timeserial(val(lbl_hora), val(lbl_minutos), val(lbl_segundos))
msgbox suma

y listo

Espero que te sirva.

Chau y suerte