TEXTBOX有关问题

TEXTBOX问题
请教：我的TEXBOX1里面有数值：1   21   35   56   51   25五个数值。请问能将它们加相吗。如果能请问怎样将它们求和

------解决方案--------------------
是想让我下不了台

我没有vb.net ，这是vb6的代码

Private Sub Command1_Click()
Dim arr1() As String
arr1 = Split( "1 21 35 56 51 25 ", " ")
Dim i As Integer
Dim sum As Integer
For i = 0 To UBound(arr1)
sum = sum + CInt(arr1(i))
Next i
MsgBox "sum= " & sum
End Sub




------解决方案--------------------
你应该改成textbox1.text
还有根据vb.net的语法，
sum = sum + CInt(arr1(i))
可以改成：
sun += CInt(arr1(i))