Question

着急！！！！用vb编程计算器这是我的代码帮我看看哪错了谢谢了！！！（在线等！）

Private Sub Command1_Click()
Text1.Text = Text1.Text + "1"
End Sub

Private Sub Command2_Click()
Text1.Text = Text1.Text + "2"
End Sub

Private Sub Command3_Click()
Text1.Text = Text1.Text + "3"
End Sub

Private Sub Command4_Click()
a = Text1.Text
choice = "+"
Text1.Text = ""
End Sub

Private Sub Command5_Click()
If choice = "+" Then
b = Text1.Text
c = Val(a) + Val(b)
Text1.Text = Val(c)
End If

End Sub

Answer 1

Dim choice As String,a As String,b As String '要设为全局变量 否则丢失

Answer 2

Text1.Text = Text1.Text + "3"
"3"是一个字符，不是一个数字吧
你要把Text1.Text转成一个数字，再+3

Answer 3

把数字前后的"都去掉 带"的系统认为是字符串 用+就连接到一起了

Answer 4

前面的几个连接符用＆符号连接