主题：[求助]二维数组问题

已知一字符串：

2，5，7，8

5，7，8，9

2，9，0，7

回车换行，每行中各值用“，”间隔

问题：如何将上面字符串定义为一个二维数组S(m,n)

大红袍老师，这个问题如何解决呀

'''...
dim str as string = "2，5，7，8" & vbcrlf & "5，7，8，9" & vbcrlf & "2，9，0，7"
msgbox(str)
dim ary1() as string = str.Replace(chr(10),"").Split(chr(13))
dim len1 as integer = ary1.length-1
dim len2 as integer = ary1(0).Split("，").length-1
dim bary(len1, len2）
for i as integer = 0 to len1
    dim ary2() as string = ary1(i).Split("，")
    for j as integer = 0 to len2
        bary(i,j) = ary2(j)
    next
next

msgbox(bary(1,2))

谢谢