用VB写个计算器

如图
我想要 按下 “计算”按钮就横着相乘
把相乘的结果在相加 并显示在下面Label12

第1个回答  2010-08-24
Private Sub Command1_Click()
Label1.caption = val(Text1.text) * val(Text2.text)
Label2.caption = val(Text3.text) * val(Text4.text)
.
.
.

Label5.caption = val(Text9.text) * val(Text10.text)

Label6 = Val(Label1) + Val(Label2) + Val(Label3) + Val(Label4) + Val(Label5)
End Sub
第2个回答  2010-08-23
Private Sub Command1_Click()
Label6 = Text1 * Text2
Label7 = Text3 * Text4
Label8 = Text5 * Text6
Label9 = Text7 * Text8
Label10 = Text9 * Text10
Label12 = Val(Label6) + Val(Label7) + Val(Label8) + Val(Label9) + Val(Label10)
End Sub本回答被提问者采纳

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网