ME AJUDEM NESSE CALCULO.

WEBIER 24/11/2004 20:31:16
#51828

Estou fazendo um calculo que me retorne em porcetagem a diferença entre 02 valores. Exemplo: imagine que tenho R$ 100 e quero chegar no valor de R$ 150 então quantos porcentos seria? resposta: 50%

Eu possuo uns textboxes:
txtCompra é o textbox onde coloco o valor que paguei pelo produto
txtImposto é o textbox onde coloco o imposto que paguei do produto
txtFrete é o textbox onde coloco o frete que paguei do produto
txtLucro é o textbox onde coloco o lucro que querot ter com a venda desse produto
txtVenda é o textbox onde aparecerá ao valor de venda desse produto(é a soma de compra+imposto+frete+lucro)

Obs: o txtimposto, txtfrete e txtlucro pode conter valores em moeda (currency) ou porcentagem. Acima dos textboxes deles possui uns optionbutton onde posso escolher se será R$ ou %

Olha o codigo ai:

FRETE = (COMPRA * FRETE) / 100
Valor = COMPRA + IMPOSTO + FRETE
VENDA = txtValorVenda.Text
LUCRO = (VENDA / Valor - 1) * 100
txtLucro.Text = Format(LUCRO, "###,###.00") & "%"

o que quero com esse codigo?
imagine que o
valor da compra = R$ 100
valor do imposto = R$ 20
valor do frete = 7%
valor do lucro = [txt-size=3]?[/txt-size]%
Valor da venda = deverá ser R$ 150

então quantos porcentos é o lucro para que o valor da venda seja R$ 150,00 ?
o lucro deve sair em porcentagem