VB 文本框中数值相加

vb中怎样将文本框中的数字相加？~

因为你 a,b,c 三个变量定义错误 不应该是字符串类型 而应该是 数值型
dim a as long ,b as long ,c as long

这样做不知道符不符合要求：
Dim a1, a2, a3, a4, a5 As Single
Private Sub Form_Load()
a1 = Val(Text1.Text)
a2 = Val(Text2.Text)
a3 = Val(Text3.Text)
a4 = Val(Text4.Text)
End Sub
Private Sub Text1_change()
a1 = Val(Text1.Text)
End Sub
Private Sub Text2_change()
a2 = Val(Text2.Text)
End Sub
Private Sub Text3_change()
a3 = Val(Text3.Text)
End Sub
Private Sub Text4_change()
a4 = Val(Text4.Text)
End Sub
Private Sub Text5_CLICK()
a5 = a1 + a2 + a3 + a4
Text5.Text = Format(a5, ".00")
End Sub

format（变量，“格式”）
变量就是你要处理的内容，可以是时间、数值、字符串等等，
格式就是你要处理完后要实现的效果。

程序是对的。
为什么不加VAL都能计算正确，是因为在计算的时候，程序发现有数字型，所以先将字符串自动转换为数字。

在一般的编程中，最好自己主动转换类型，因为被动转换容易出现BUG。

text2数值为10，2+5+8=15，为什么数值10位于第三个框
text2数值为16，2+5+8+7=22，为什么数值16位于第四个框
是以什么规律来得出的？
请采纳。

---

VB 文本框中数值相加视频