找回密码
 加入
搜索
查看: 2074|回复: 1

数组赋值报错,请帮我指出错误

[复制链接]
发表于 2009-7-19 15:00:57 | 显示全部楼层 |阅读模式
本帖最后由 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天了 .....  谢谢
 楼主| 发表于 2009-7-19 16:46:34 | 显示全部楼层

我太白痴了 不好意思  太白痴的错误了

不用回复了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-9-23 00:29 , Processed in 0.073413 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表