buenas... tengo otro problema con este codigo ya correjido por uno de
los grandes de aca... esto es para hacer lo de el manual de visual
basic, q tiene varios errores, me e dado cuenta mientras lo voy
haciendo... lo cierto es q me subraya esa linea no c por que.. gracias
a los que me puedan ayudar, y a los que no, tambien... ATT:Alkaline ( TITULO EDITADO POR LA NORMA 2.1)



Dim hParada As String

Dim tiempo As String

Dim hInicio As String





Private Sub cmdInicio_Click()

hInicio = Now

txtHinicio.Text = Format$(hInicio, "hh:mm:ss")

cmdInicio.Enabled = False

cmdParada.Enabled = True

End Sub



Private Sub cmdParada_Click()

hParada = Now

txtHParada.Text = Format$(hParada, "hh:mm:ss")

txtTTranscurrido.Text = Format$(tiempo, "hh:mm:ss")

tiempo = (hParada - hInicio)

cmdInicio.Enabled = True

cmdParada.Enabled = False

End Sub
Edited by: Alkaline

hola



Mira lo que veo es que estas intentando restar dos cadenas de caracteres, (aunque representen los tiempos).



Lo que estarias haciendo es algo asì:



tiempo = (hParada - hInicio)

tiempo = ("03:02:34" - "07:45:00") ' Por decir algo



seria lo mismo que escribieras esto:



tiempo = ("Hola mundo" - "adios mundo")



de acuerdo?, lo que optienes auque tenga el formato de hora no deja de ser cadena.



lo que puedes hacer es combertilo a fecha/hora



Function CDate(Expression) As Date



Convierte una expresión a un valor Date



mas o menos quedaria así:



tiempo = sSrt((cDate(hParada) -cDate ( hInicio) ))





Espero que te ayude de algo este codigo.



saludos

Iniciado por nexo

hola



Mira lo que veo es que estas intentando restar dos cadenas de caracteres, (aunque representen los tiempos).



Lo que estarias haciendo es algo asì:



tiempo = (hParada - hInicio)

tiempo = ("03:02:34" - "07:45:00") ' Por decir algo



seria lo mismo que escribieras esto:



tiempo = ("Hola mundo" - "adios mundo")



de acuerdo?, lo que optienes auque tenga el formato de hora no deja de ser cadena.



lo que puedes hacer es combertilo a fecha/hora



Function CDate(Expression) As Date



Convierte una expresión a un valor Date



mas o menos quedaria así:



tiempo = sSrt((cDate(hParada) -cDate ( hInicio) ))





Espero que te ayude de algo este codigo.



saludos

primero que todo gracias... tengo varios puntos:
1. no funciono cuando copie la linea "tiempo = sSrt((cDate(hParada) -cDate ( hInicio) ))"
2. al parecer hay algun error en la parte del "sSrt" porq me dice q no esta definido, quizas quisiste decir algo con eso pero no lo capte
3. en caso de q funcione, bien gracias, porq de verdad no entendi q quieres decir con convertir a un valor Date. me podrias explicar un poco mejor, digo para entender...

Gracias..
Edited by: Alkaline

Ok


Mira se me paso algo:

No es sStr ()

Es cStr() <- Combiente una expresion a cadena chkalo


Y lo de las cadenas y Date, Mira un tipo de dato cadena es una coleccion de caracteres como por ejemplo "Juan Enrique".

Otro tipo de dato, el Date representa horas y fechas como por ejemplo: 01/may/2006 ó horas 03:45:05

Si es posible restar fechas y horas directamente (o creo que para las fechas necesitas una funcion) pero las cadenas no las puedes restar asì como asì.

Osea VB no sabe que es lo vas a restar, por eso te ponia este ejemplo, la primera linea es lo que tu tienes:

tiempo = (hParada - hInicio)
'Esta linea sirve nada mas de ejemplo e ilustraria lo que estarias haciendo (restando dos cadenas)

tiempo = ("03:02:34" - "07:45:00") ' Por decir algo



tiempo = ("Hola mundo" - "adios mundo") ' aqui Vb no sabria que es lo que quieres restar

Por eso la aclaracion de que los combirtieras en Date para poder hacer la resta y despues pasarlos a cadena con cStr()

Si tienes dudas sobre estas funciones cheka el examinador de Objetos de VB (presionando F2) y te explica que es lo que arrojan esas funciones u cuales son los parametros que reciben.

Espero ahora si haberte ayudado en algo...

Saludos