VB问题!! 加法代码

来源:百度知道 编辑:UC知道 时间:2024/05/18 07:19:07
Private Sub CmdAdd_Click()
Test3.Test = Str$((Val.Test1.Test) + (Val.Test2.Test))
End Sub 高手帮我看看谢谢
2位高手我用了之后你们改过的代码。但是运行时候就说 实时错误 '424' 要求对象。 我是VB6精装版的。

应该是:
Text3.Text = Str$(Val(Text1.Text) + Val(Text2.Text))

text不是test
val()形式

Test3.Test = Str$((Val.Test1.Test) + (Val.Test2.Test))
应该是:
Text3.Text = Str$((Val.Text1.Text) + (Val.Text2.Text))

Test3.Test = Val(Test1.Test) + Val(Test2.Test)

你该成这样就可以了!不用str$.听我的没错!