Vervolg korting berekenen

Status
Niet open voor verdere reacties.
Code:
Dim Aantal, Betalen As Double

Aantal = TextBox1.Text
Betalen = Aantal * 8

If Aantal > 10 Then
Betalen = Aantal * 8 * 0.85
ElseIf Aantal > 20 Then
Betalen = Aantal * 8 * 0.7
End If

TextBox2.Text = Betalen

En als je het zo doet?

Trouwens: Is dit een opdracht voor school?
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan