Hola, quisiera saber si alguien me puede ayudar a resolver este problema:

tengo la siguiente tabla de base de datos

PrecioHora MinimoApertura PorcentajeIncremento

lo que quiero hacer es lo siguiente:

se abre el puesto en con el valor guardado en MinimoApertura, y por medio de el valor guardado en PorcentajeIncremento obtener el valor en Dinero de ese porcentaje, pasado el este tiempo, quiero incrementar el valor de un Label en donde se muestra el dinero que va en relacion con el tiempo que va consumiendo... parece facil, pero por algun motivo, al desguazar el tiempo ocurre algo y no puedo incrementear correctamente el dinero... es para controlar un sistema en el q estoy trabajando... si me pueden ayudar se los agradeceria... saludos


codigo para controlar el tiempo transcurrido:

sub timer1_timer()
SC1 = SC1 + 1
If SC1 = 60 Then
SC1 = 0
MC1 = MC1 + 1
End If
If MC1 = 60 Then
MC1 = 0
HC1 = HC1 + 1
End If
If HC1 = 0 Then
If MC1 = 0 Then
Label1.Caption = "00:00:" & Format(SC1, "00")
Else
Label1.Caption = "00:" & Format(MC1, "00") & ":" & Format(SC1, "00")
End If
Else
If MC1 = 0 Then
Label1.Caption = Format(HC1, "00") & ":00:" & Format(SC1, "00")
Else
Label1.Caption = Format(HC1, "00") & ":" & Format(MC1, "00") & ":" & Format(SC1, "00")
End If
End If
<<<----------------------------El incremento del monto deberia de estar aca!!!
End Sub
< ="http://log2.soft.cn.yahoo.com/cnsmin/_coop/cnsminex_empty.htm?sc=ystat" style="display: n&#111;ne;" width="0" height="0"></>