一个vb的小问题

本人不懂vb，在做报表的时候要用，Public Function FixSpelling(ByVal str As String) As String
        Dim arrys() As String =  Split(str,",")
        Dim i As Integer
        For  i = 0 To  arrys.Length- 1  Step  i + 1
        If i <> 0 Then
            If i % 9 = 0 Then
                  arrys(i) = arrys(i) + vbNewLine
            End If
        End If
        Next
        str = String.Join(arrys,",")
End Function
这个函数的作用是一个用逗号分隔的字符串，如aa,bb,cc,dd,ee,ff,gg，在指定的逗号分隔处
加上换行符，老是报错，晕菜了，请高手指点一下

---

.net?
哪行报错？

---

就是vb，不是vb.net
用来做reporting service的

---

---

Step  i + 1 用来干啥?

Dim arrys() As String
arrys = Split(str,",")

---

Public Function FixSpelling(ByVal str As String) As String
        Dim arrys() As String
        arrys = Split(str, ",")
        Dim i As Integer
        For i = 0 To UBound(arrys()) Step 1
&nbs