读书人

TEXTBOX有关问题

发布时间: 2012-01-19 20:57:58 作者: rapoo

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))

读书人网 >VB Dotnet

热点推荐