luizgs
|
CURITBA
PR - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 06/12/2010 06:00 hs
bom dia amigos, como eu posso mutiplicar um valor de horas por um numero, ex:
15:00 horas multiplicado por 31.8
txtvalor.Text = (txthora.Text * 31.8)=477,00
(15:00)
Obrigado
Luiz
|
|
|
|
|
|
|
|
Postada em 06/12/2010 09:34 hs
Oi luiz se vc for so multiplicar horas sem minutos coloca um mid(txthora.text,1,2) =15
mais se quiser pegar ate os minutos ai vc tem que convertir de minutos para horas e somar para depois multiplicar.
exemplo: 15:16
seria: txtvalor.Text = (15+ 16/60/)*31.8
txtvalor.Text = 485,48
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 06/12/2010 11:01 hs
Desculpe Juan mas não seria isto Dim Calculo As Double Calculo = (Mid("15:16", 1, 2) * 60) + Mid("15:16", 4, 2) Calculo = Calculo * 31.8 txtValor = Calculo |
|
|
|
luizgs
|
CURITBA
PR - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 06/12/2010 12:14 hs
Bom dia, Juan e Treze muito obrigado plelo retorno.
luiz
|
|
|
|
|
|
Postada em 06/12/2010 14:12 hs
Treze não é mesmo: não postei o codigo literalmente pq queria dar o conceito de como ia ser calculado, por isso so coloquei o calculo
seria assim:
Dim Calculo As Double
Calculo = ((Mid(val(txthora.Text), 1, 2) + Mid(val(txthora.Text), 4, 2)/60) * 31.8
resultado=485,48
txtValor = Calculo
|
|
TÓPICO EDITADO
|
|
|
|
