7,763
社区成员
发帖
与我相关
我的任务
分享VB中Split函数的用法？
比如a="1,2,3,4,5",我想把1，2，3，4，5分别取出，用x=Split(a,",")这样写对不对，
x的值是什么？也就是怎么样得到1，2，3……
x的值是什么？也就是怎么样得到1，2，3……
...全文
请发表友善的回复…
发表回复
willway 2002-07-10
- 打赏
- 举报
a="1,2,3,4,5"
x=Split(a,",")
for each y in x
…………操作…………
next
呵呵，各位谢了！
x=Split(a,",")
for each y in x
…………操作…………
next
呵呵，各位谢了！
willway 2002-07-10
- 打赏
- 举报
a="1,2,3,4,5"
x=Split(a,",")
for each y in x
…………操作…………
next
呵呵，各位谢了！
x=Split(a,",")
for each y in x
…………操作…………
next
呵呵，各位谢了！
xxlroad 2002-07-10
- 打赏
- 举报
Private Sub Command1_Click()
Dim i As Integer
Dim strAll As String
Dim strCity() As String
strAll = "1,2,3,4,5"
strCity = Split(strAll, ",", , vbTextCompare)
For i = 0 To UBound(strCity)
List1.AddItem strCity(i)
Next
End Sub
'VB6.0通过 VB5.0通不过
Dim i As Integer
Dim strAll As String
Dim strCity() As String
strAll = "1,2,3,4,5"
strCity = Split(strAll, ",", , vbTextCompare)
For i = 0 To UBound(strCity)
List1.AddItem strCity(i)
Next
End Sub
'VB6.0通过 VB5.0通不过
GANXIAOPENG 2002-07-10
- 打赏
- 举报
x=split(a,",",-1,vbTextCompare)
msgbox x(0)
msgbox x(1)
...
bygones2001 2002-07-10
- 打赏
- 举报
得到一个数组，下标从0开始
bygones2001 2002-07-10
- 打赏
- 举报
a="1,2,3,4,5"
m1 = Split(a,",")(0) //1
m2 = Split(a,",")(1) //2
m3 = Split(a,",")(2) //3
m4 = Split(a,",")(3) //4
m5 = Split(a,",")(4) //5
m1 = Split(a,",")(0) //1
m2 = Split(a,",")(1) //2
m3 = Split(a,",")(2) //3
m4 = Split(a,",")(3) //4
m5 = Split(a,",")(4) //5
zyl910 2002-07-10
- 打赏
- 举报
Dim x() as Variant
a="1,2,3,4,5"
x=Split(a,",")
a="1,2,3,4,5"
x=Split(a,",")
