设计一个窗体,使用一个按钮"输入"来接受用户输入的两个数,使用另外四个按钮"加"、“减”、“乘”、“除”来执行这两个数的加、减、乘、除运算,利用标签显示结果
參考答案:先放置5个按钮1个标签
Dim x, y As Integer
Private Sub Command1_Click()
x = Val(InputBox("请输入第一个数"))
y = Val(InputBox("请输入第二个数"))
End Sub
Private Sub Command2_Click()
Label1.Caption = x + y
End Sub
Private Sub Command3_Click()
Label1.Caption = x - y
End Sub
Private Sub Command4_Click()
Label1.Caption = x * y
End Sub
Private Sub Command5_Click()
Label1.Caption = x / y
End Sub