请教如何拆分字符？

[shenxian6]

如题
有一个变量ABC，值="AFSLCLCMLDOCVLSD"这样，是一组字母组成的字符串

问题是：如何按照3个一位，来拆分这个字符串，组成一个数组？

AFS LCL 这样拆分？
for i=0 to xxx


next

[shenxian6]

按照顺序，依次三个字母一组，一直拆分完这个字符串

[天上下雨]

截取前三个字符，放到定义好的数组中，在剩下的字符串中再截取3个字符，放到数组中，就这样一直，知道截取完。

[shenxian6]

如何截取呢？

[ttt2]

<%
str1="AFSLCLCMLDOCVLSD"

strlen=len(str1)
if strlen mod 3 =0 then
cs=strlen/3
else
cs=int(strlen/3)+1
end if

for i=0 to cs
response.write mid(str1,i*3+1,3)&"<br>"
next
%>

[shenxian6]

非常感谢！