Visual Basic - Problemas con Timer

acabo de revisar mi codigo y de reescribirlo y he notado que funciona a medias, es decir, no hace el calculo que deviera hacer
se supone que se cobra la hora a 10 pesos por lo tanto los 15 min deven ser a 2.5. ,, bueno el programa me dice que los 15 min son 2.00,, el codigo es este

private sub Timer1_Timer()
text2 = val(text2)+1
acumula = acumula = 1
text3 = format(((acumula * val(text1))/60)/100,"CURRENCY")
form1.caption = text3.text
end sub

pueden ayudarme????????????????

Revisa bien los tipos de tus variables, por ejemplo si pones dim x as integer, x solo puede tomar valor enteros y no decimales, x solo va a tomar 2.00 y no 2.50
Verifica eso, segura que por alli es la cosa.

Las variables estan bien,, ya que a menos de que deva usar un tipo single o uno double
ahora si se tratara de que la variable esta mal no me mostraria esto 10.95 o 2.37, asi que creo es otra cosa, de cualquiermarea gracias, sigo esperando sugerencias