钛合金骨头:用vb编一个加减法的exe

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/05 11:45:42
我想用一个exe去算加减法,有两个文本框,一个按钮,还有一个label框,我想输入几个数在这两个文本框中,单击按钮,然后让exe算加减,把得出结果放在label框中。谢谢!有没有代码借我看看。

Private Sub Command1_Click()
Label1.Caption = "加法=" & Val(Text1) + Val(Text2) & vbNewLine & "减法=" & Val(Text1) - Val(Text2)
End Sub

Private Sub Form_Load()
Text1 = "": Text2 = ""
End Sub

一个按钮怎么出两个运算啊。。。1就加。。1就减。Private Sub Command1_Click()
Label1.Caption = Val(Trim(Text1.Text)) + Val(Trim(Text2.Text))
End Sub
这个是加的。