本帖最后由 yinle 于 2009-7-19 15:07 编辑
第一次弄数组 测试了帮助文件里面的代码 如下:
#include <Array.au3>
Dim $avArray[1]
$avArray[0] = "JPM"
_ArrayDisplay( $avArray, "原来的数组" )
_ArrayAdd( $avArray,"Brian")
_ArrayDisplay( $avArray, "更新后的数组" )
运行成功
可我自己的代码就报错,运行不能继续,请帮我指出错误
#include <IE.au3>
#include <Array.au3>
Dim $a,$b,$c,$d,$e,$f,$g,$h,$i,$j,$l,$m,$n,$o,$p,$q,$r,$s,$t,$u,$x,$y
Dim $arr[1]
$arr[0] = 'abcdefghijklmnopqrst'
y = 0
.
.
省略
.
.
For $x = 1 to 690 Step 1
Do
If StringInStr($s,$k) == 0 Then ExitLoop
$s = StringRight($s,StringLen($s)-StringInStr($s,$k)+1-StringLen($k))
$m = StringLeft($s,StringInStr($s,$l)-1)
$u = $k & $m
If y == 0 Then $arr[0] = $u
If y > 0 Then _ArrayAdd($arr,$u)
MsgBox(0,"",$k&$m&@CRLF&string($y))
_ArrayDisplay( $arr, "数组" )
$y = $y + 1
Until 0
Next
如上,运行到 “If y = 0 Then $arr[0] = $u” 时候提示错误“Error parsing function call.”
如果注释掉这行 运行到下一行 “If y > 0 Then _ArrayAdd($arr,$u)”也提示同意的错误,以上DIM中 除了$x $y是整形,其他全部变量都是字符串,数组$arr是字符串数组,并且确保$u是非空字符串,但是长度要比赋值时候要长得多。
请帮我指出错误,困恼我2天了 ..... 谢谢 |