下面vb6代码哪里有错?

来源:百度知道 编辑:UC知道 时间:2024/06/05 00:57:18
Private Sub Command6_Click()
If Text2.Text = "+" Or Text2.Text = "-" Or Text2.Text = "*" Or Text2.Text = "/" Then
Text3.Text = Text3.Text & 1
If Label1.Caption = "1" Then
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Label.Caption ""
Text1.Text = Text1.Text & 1
Else
Text1.Text = Text1.Text & 1
End If
End Sub

&连接符是连接字符串的。
而字符串要用双引号括起来。
例如Text3.Text = Text3.Text & 1 就要改成
Text3.Text = Text3.Text & "1"

同意楼上的.你应该确定你要输入的是数字还是字符串.如果你用"+",可能它不会报错,但是很可能得不到你想要的结果.