1 Form Caption
6 Label Caption
6 TextBox Text
3 Command Caption
Code:
b1 = Val(Text1.Text)
b2 = Val(Text2.Text)
b3 = Val(Text3.Text)
b4 = Val(Text4.Text)
mfa = (b1 + b2 * 2 + b3 * 3 + b4 * 4 / 10
Text5.Text = mfa
nm = (50 - (b1 + b2 * 2 + b3 * 3)) / 4
Text6.Text = nm
mfa = (b1 * 1 + b2 * 2 + b3 * 3 + b4 * 4) / 10
Por que é dividido por 10?
Porque é soma dos pesos (ex: 1 + 2 + 3 + 4 = 10)
nm = (50 - (b1 * 1 + b2 * 2 + b3 * 3)) / 4
No comments:
Post a Comment