超级基础的程序问题
我刚学VB,下面的代码我就想让两个框中的数加起来等于第三个框中的,请问哪里错了,谢谢。在线等!!!
Private Sub Command1_Click()
Dim s1%, s2%,s3%
Text3.Text = s3 = s2 + s1: Text1.Text = s1: Text2.Text = s2
End Sub
[解决办法]
1.建议不要使用“:”
2.赐值符号写反了,应该是
s1=Text1.Text
s2=Text2.Text
3.看来你还没理解赐值符号的用法
Text3.Text = s3 = s2 + s1
是错误的,根本不需要s3
正确写法
Text3.Text = s2 + s1
4.Text3.Text是字符串类型的,而s1,s2是整数类型的,所以需要转换。
修改如下
Private Sub Command1_Click()
Dim s1%, s2%
s1=cint(Text1.Text)
s2=cint(Text2.Text)
Text3.Text = cstr(s2 + s1)
End Sub