>Estou com um "probleminha". Favor rode o prg abaixo:

Oi Edson;

Tente:

*----------
valor_total_venda    = 100
Numero_parcelas      = 3
diferenca            = 0
IF  Numero_parcelas > 1
    Valor_parcela    = round(valor_total_venda / Numero_parcelas, 2)
    diferenca        = valor_total_venda - (valor_parcela*Numero_parcelas)
Endif

messagebox(alltrim(str(diferenca)))
*-----------------

>verá que este código, sairá com diferenca = zero.
>Favor, preciso que este resultado final seja 0,01, pois 100/3 = 33.33 e 33.33*3 deve ser 99.99.
>Acho que está tendo algum problema de arredondamento.
>
>Agradeço