用vb将字符串“2,3,6,12-20,22,24-25”转变为数组？

来源：百度知道编辑：UC知道时间：2024/05/30 20:46:51

用逗号做分割，转变为数组，并求出数组的个数

看谁的方案最简洁

dim r as string ,A,n as integer
r="2,3,6,12-20,22,24-25"
a=split(r,",")
n=ubound(a)

Dim S as string,Arr
S="2,3,6,12-20,22,24-25"
Arr=Split(S,",")
For i=0 to Ubound(Arr)
Print Arr(i)
Next

补充一楼的回答，数组个数=ubound(a)+1.