Programación General > Visual Basic 6.0 e inferiores
Calcular Hora
Angel38:
Hola,
La forma de sumar o restar horas es esta.
--- Código: Text ---suma=timevalue(Hora1) + timevalue(Hora2)
Para restarlas solo tienes que cambiar el simbolo. Ya como lo apliques seria cuestion tuya.
Te sugiero que los coloques en variables y luego hagas las operaciones correspondiente y suma (o resta) la envias a el label "Horas".
Espero haberte ayudado.
UserCode:
Igual si se coloca 6:00 am y 6:30 am y otro misma hora entre "hora en punto" y la msima hora pero "media hora" da 12:30am (resta de horas, la diferencia entre ellas) :(
Pero voy a trabajar con todo esto, creo que ni con hora militar serviria, puesto que igual estaria el problema por debajo de las horas de las 12pm. Eso porque tengo varios ComboBox con una lista de horas y existe datos de Horas Extra, sea Diurnas o Nocturnas y puede pasar que alguien trabaje al menos 30 minutos, tomandose eso en la parte de horas Extras.
gracias de igual forma :)
UserCode:
Bueno, la diferencia entre H1 y H2 = Nº Hrs
Las horas se indican en unos Combo y la diferencia de hroas entre estos en un Label, pues mientras (no sé si para siempre) cambie el Label de salida de horas por un Text
Cuando coloquen 7:00 am - 7:30 am =12:30 am quitan el 12 y ponen un 0
Despues de todo, aunque los combo tienen un listado de horas
6:00 am
6:30 am
7:00 am
7:30 am
.... etc
.... etc
Igual en ocasiones se escribe la hora en vez de seleccionarse de la lista porque al parecer, una persona puede haber llegado a las 7:08 am y haber salido a las 11:43 am
El codigo funciona con esto, solo falla en lo ya comentado antes. No es la solución ni lo más elegante, podría tardarme no sé cuántos días intentando nuevas sintaxis y buscando en internet, pero por los momentos, cambie los Labels de salida por Text y así el mismo usuario que corriga el problema.
Por cierto, alguien sabe como poner en controles de Calendario DTPicker, el primer y ultimo dia del mes? tengo dos: DTPFecha1 y DTPFecha2 pero los actualizo con el día actual con un = Date
¿Cómo sería para poner en el DTPFecha1.Value = 01/M/Año y en el otro DTPFecha2.Value=31/M/Año (de cada mes). Esos calendarios controlan de llenar en un MSFlexGrid los registros, es para ver si muestran la panoramica del mes y no del día actual.
Voy a seguir viendo que hago con eso de sumar horas, saludos :hola:
:comp:
Angel38:
Busca informacion sobre la forma de sumar horas (TimeValue), y la verdad viejo eso funciona es sumando horas militar.
Aunque a mi parecer cuando trabajé con las sumas de horas, si escogias 3:00 p.m. como ejemplo, el en la suma la pasaba a Hora militar.
Lastima que no te pueda ayudar más, pues no recuerdo como solucionaba ese asunto, pero es por ahi. :P
UserCode:
--- Citar --- Busca informacion sobre la forma de sumar horas (TimeValue), y la verdad viejo eso funciona es sumando horas militar.
--- Fin de la cita ---
Buscando... :P thx.
Navegación
[#] Página Siguiente
[*] Página Anterior
Ir a la versión completa