13问答网 > 做一个简单的vb计算器，两个输入数字的分别为text1.text2运算符号为label1

做一个简单的vb计算器，两个输入数字的分别为text1.text2运算符号为label1

2025-02-26 02:03:12

推荐回答（1个）

回答1：

Private Sub Command1_Click()
    Label1.Caption = "+"
    Label3.Caption = Val(Text1.Text) + Val(Text2.Text)
End Sub

Private Sub Command2_Click()
    Label1.Caption = "-"
    Label3.Caption = Val(Text1.Text) - Val(Text2.Text)
End Sub

Private Sub Command3_Click()
    Label1.Caption = "×"
    Label3.Caption = Val(Text1.Text) * Val(Text2.Text)
End Sub

Private Sub Command4_Click()
    Label1.Caption = "÷"
    Label3.Caption = Val(Text1.Text) / Val(Text2.Text)
End Sub

Private Sub Command5_Click()
    End
End Sub