SEMANA # 35

Evaluación 
pc = Val(TextBox2.Text)
        pi = Val(TextBox3.Text)
        pb = Val(TextBox7.Text)
        t = (pc * 4) + (pi * -1) + (pb * 0)
        TextBox1.Text = t