ARREDONDAR VALORES PARA CIMA

ERLANMG 06/07/2011 13:45:52
#378595
Caros Colegas,

Tenho um sistema rodando em uma empresa e me pediram para arredondar para cima todos os valores à pagar para o funcionários, por exemplo:

O funcionário que tem à receber 989,60 ele receberá 990,00
O funcionário que tem à receber 431,01 ele receberá 432,00

O relatório é feito em crystal report, então temos duas opções ou crio um campo no meu bd e já gravo os valores arredondados ou então arredondo pelo crystal (se tiver jeito é claro).

Alguém tem idéia como faço isso.

Desde já agradeço a atenção dispensada.

Abraços e até mais.

ROBIU 06/07/2011 14:16:19
#378596
Resposta escolhida
Veja se isso funciona:
   If Val(Text1.Text) = Round(Text1.Text) Then
Text1.Text = Val(Text1.Text) + 1
Else
Text1.Text = Round(Text1.Text)
End If


Veja este tópico também
Tópico encerrado , respostas não são mais permitidas