none
Tabela / If Else RRS feed

  • Pergunta

  • Boa Tarde

    Tenho uma tabela da forma abaixo, onde  o valor é  função da quantidade. Eu usei a função If..Then..Else, existe uma forma mais simples de fazer isso? Qtde               Valor

    de 1 a 50        R$ 20,00

    de 51a 100        R$ 18,00

    de 101 a 150     R$ 17,00

    If

    CDbl(Qtde.Text) <= 50.0 Then

    Valor.Text = FormatCurrency(20.00, 2)

    Else

    If CDbl(qtde.Text) <= 100.0 Then

    Valor.Text = FormatCurrency(18.00, 2)

    Else

    Obrigado

    domingo, 15 de julho de 2012 16:33

Respostas