VB6.0初级问题，新手请教~

来源：百度知道 编辑：UC知道 时间：2024/05/30 15:27:12
建立text1、text2、text3和Command1，运行时在text1、text2中分别输入12、13（数字不一定），按Command1后在text3中显示两数值的和25。问下各位高手这段代码该怎么写，谢~
是全部的代码！谢谢各位~

Private Sub Command1_Click()
Dim a, b As Long
a = Val(Text1.Text)
b = Val(Text2.Text)
Text3.Text = Str(a + b)
End Sub
双击Command1

Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub

'定义变量
Dim a As Single
Dim b As Single
Dim s As Single

Private Sub Command1_Click()
s = a + b
Text3.Text = s
End Sub

Private Sub Text1_Change()
a = Val(Text1.Text)
End Sub

Private Sub Text2_Change()
b = Val(Text2.Text)
End Sub
'很久没用VB了，手都生了……

哥们建议你到eNET网站里面看视频，那里有免费的视频教你怎么用VB编程，那不但会教会你这个，还会教会你更多的关于VB的知识。你在百度里百度一下 VB eNET后选择最前面的链接就是的里面的视频很好。

下面是链接：http://www.enet.com.cn/eschool/video/vb/