Dim S = "abcdefghi"
Dim A As New ArrayList
For i = 0 To S.Length - 1 Step 3
A.Add(S.Substring(i, 3))
Next
MsgBox(A(0))
Dim A As New ArrayList
For i = 0 To S.Length - 1 Step 3
A.Add(S.Substring(i, 3))
Next
MsgBox(A(0))
|
.NET
Split String by length |
|
|