COMO CALCULAR PRECO POR HORA???

USUARIO.EXCLUIDOS 18/12/2006 14:18:26
#190636
Pessoal, estou fazendo um programa de estacionamentos que deve calcular um preco a cada hora, por exemplo.
1 hora 5,00
2 hora 8,00
Demais 2,00

Ja revirei a net e nao acho =/ Gostario ,muito que me ajudassem!!!
Obrigada!!
ALMARTI 18/12/2006 14:30:01
#190643
Bom, parece ser uma questão de lógica, não acha?

If TotalDeHoras <= 1 then
Valor da Hora = 5.00
elseif TotalDeHoras > 1 And TotalDeHoras <= 2 then
Valor da Hora = 8.00
else TotalDeHoras > 2 then
Valor da Hora = 2.00
End if
USUARIO.EXCLUIDOS 18/12/2006 16:08:36
#190683
bom, esse codigo nao funcionou...

Da erro "Type mismatch"
USUARIO.EXCLUIDOS 18/12/2006 16:12:49
#190686
...
[S27]
ALMARTI 18/12/2006 16:15:59
#190690
Não é um código, é um algoritimo, você precisa adaptar à  sua funcionalidade.
ESLEYSANCHES 18/12/2006 16:19:25
#190693
Talvez um exemplo de estacionamento te ajude...

de uma olhadinha no exemplo abaixo:

http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=3037&TxtSearch=calcular%20hora&CmbSort=&varPagina=1

Espero que te ajude !!
Abraços !!
USUARIO.EXCLUIDOS 18/12/2006 16:45:09
#190708 Resposta escolhida
Angel..tenta isso

Dim ValHora as Currency

If TotalHora = 1 Then
ValHora = 5
elseif TotalHora >1 And TotalHora <=2 then
ValHora = 8
else
ValHora = (8) + (2 * Int(ValHora - 2) + 1)
endif

Onde 8, equivale as 2 horas..
O Int(ValHora)..fará com que pegue (aí faça como quiser), mas a lógica seria pegar o número de horas e multiplicar por 2..

assim..se o cara ficou 4:30 horas seria como se fosse 5 horas então( 2 horas normais + 3 horas adicionais = R$ 12,00 ) ..total

Bom...acho q expliquei mais ou menos..qq coisa...posta novamente..daremos um jeito
USUARIO.EXCLUIDOS 18/12/2006 18:06:42
#190736
Brigada gente!!!!
Consegui!!
Valeu mesmo pela ajuda!
Tópico encerrado , respostas não são mais permitidas
Voltar