vb加减计算器怎么制作 只要加减 高手帮忙啊!!!

来源:百度知道 编辑:UC知道 时间:2024/05/03 00:39:12
最好要能直接复制上去的代码 谢谢大家了

假设Text1里放的是被加数/被减数,Text2里放的是加数/减数,label1的caption属性存放结果。单击Command1时执行加法,单击Command2时执行减法。程序如下:
Private Sub Command1_Click()
Label1.Caption = Str$(Val(Text1.Text) + Val(Text2.Text))
End Sub
Private Sub Command2_Click()
Label.Caption = Str$(Val(Text1.Text) - Val(Text2.Text))
End Sub