vb计算机加减法程序的问题

If Label1.Caption = "+" Then
Text3 = Text1 + Text2

End If
If Label1.Caption = "-" Then
Text3 = Text1 - Text2
End If
[

请问为什么减号可行加号不可行

你这里的加减都是字符串加减，应该转换为数值再进行加减，可以这样写
Text3 = Str(Val(Text1) + Val(Text2))
Text3 = Str(Val(Text1) - Val(Text2))