nv016252
Message postés1Date d'inscriptionmiércoles, 20 de marzo de 2013EstatusMiembroÚltima intervenciónmiércoles, 20 de marzo de 2013
-
Modificado por Carlos-vialfa el 2/04/2013, 16:08
Hola, estoy haciendo mi tesis de la universidad y es un proyecto de entrada y salida de personal, estoy enredado en restar las horas
por ejemplo : un empleado marca su entrada a las 02:00:00 y sale a las 04:00:00
el resultado debería ser 2 horas les dejo mi código y el error que me da al intentar hacer esto de antemano muchas gracias
este es mi código :
Public Class Command1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim t0, t1 As Object
t0 = Format(TextBox1.Text, "04:24:50")
t1 = Format(TextBox2.Text, "08:24:50")
TextBox3.Text = Format(TimeValue(t1) - TimeValue(t0), "hh:mm:ss")
End Sub
End Class
Este es el error que me envía:
No se puede convertir un objeto de tipo 'System.TimeSpan' al tipo 'System.IConvertible'.
y si coloco el codigo de esta manera:
Public Class Command1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim t0, t1 As Object
t0 = Format(TextBox1.Text, "hh:mm:ss")
t1 = Format(TextBox2.Text, "hh:mm:ss")
TextBox3.Text = Format(TimeValue(t1) - TimeValue(t0), "hh:mm:ss")
End Sub
End Class
me envia el siguiente error:
La conversión de la cadena "hh:mm:ss" en el tipo 'Date' no es válida.