超级基础的程序问题

ljeternity

我刚学VB，下面的代码我就想让两个框中的数加起来等于第三个框中的，请问哪里错了，谢谢。在线等！！！
Private Sub Command1_Click()
Dim s1%, s2%，s3%
Text3.Text = s3 = s2 + s1: Text1.Text = s1: Text2.Text = s2
End Sub

ljeternity

高手快来啊！！！

iori90

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

aacc11

应该先用Val函数将文本转换为数字再相加

Text3.text=val(text1.text)+val(text2.text)