昨天做了个计算器，减法乘法除法都可以，就是加法1+1=11  5+5=55.求各位大大帮帮忙

Private Sub Command1_Click()
Text3 = Text1 + Text2
Dim a As String
a = "计算中...  "
MsgBox a
End Sub
------------------
Private Sub Command2_Click()
Text3 = Text1 - Text2
Dim a As String
a = "计算中... "
MsgBox a
End Sub
-----------
Private Sub Command3_Click()
Text3 = Text1 * Text2
Dim a As String
a = "计算中...  "
MsgBox a
End Sub
------------
Private Sub Command4_Click()
Text3 = Text1 / Text2
Dim a As String
a = "计算中...  "
MsgBox a
End Sub
------------
Private Sub Form_Load()
Dim a As String
a = "欢迎试用10进制计算器，廖将豪制作 "
MsgBox a
End Sub
----------
Private Sub Label1_Click()

End Sub
---------------
Private Sub Text1_Change()

End Sub
是代码

那里有错误啊？

首先你要使用TextBox的Text属性,而不要直接使用TextBox的名字
然后你还要用Val将字符串转化为数字
也不用定义a=计算中...这句,直接用Msgbox "计算中..."就可以了,甚至连这个Msgbox也是多余的

Private Sub Command1_Click()
Text3 = Val(Text1) + Val(Text2)
Dim a As String
a = "计算中...  "
MsgBox a
End Sub

谢谢啊

Private Sub Command1_Click()
Text3 = Val(Text1) + Val(Text2)
Dim a As String
a = "计算中...  "
MsgBox a
End Sub

Private Sub Command1_Click()
Text3 = Text1+ Text2
Dim a As String
a = "计算中...  "
MsgBox a
End Sub
为什么乘法减法和除法可以，而加法不行呢？

+既是数学加法运算符也是字符串连接符,只有+两边的变量是数字时才进行数学运行,如果两边都是字符串就进行字符串连接,如果两边的变量类型一个是字符串一个是数字则会出错

谢谢