R3 = CDbl(TextBox1.Text)
R1 = CDbl(TextBox2.Text)
V2 = CDbl(TextBox4.Text)
V1 = CDbl(TextBox3.Text)
Av = (R3 / R1) * (V2 - V1) 'Av = (R3 / R1) * (V2 - V1)
Label13.Text = Av
=========================================
Other items to offer :
Buy local , helps Australian grows
Offer :