51Testing软件测试论坛

标题: 这句话为什么运行的时候，总是提示语法错误？ [打印本页]

作者: zxz1337 时间: 2009-8-7 12:25
标题: 这句话为什么运行的时候，总是提示语法错误？
Dim strvar,i
strvar="abcde"
ReDim Arr(len(strvar)-1)    '定义动态数组的长度

For i=0 to len(strvar)-1
Arr(i)=Mid(strvar,i,1)  '
msgbox(Arr(i))
Next

作者: dreamever 时间: 2009-8-7 13:27
Dim strvar,i
strvar="abcde"
ReDim Arr(len(strvar)-1)    '定义动态数组的长度

For i=0 to len(strvar)-1
Arr(i)=Mid(strvar,i+1,1)  '
msgbox(Arr(i))
Next

这样就可以了。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)