数组的声明是否可以不说明这个数据组包含多少个数据

2011风之叶

我现在想声明一个数据组，但是我不确定这个数据组有多少个数据，怎么办

afan

Local $a[1]  
需要更改时 ReDim

skyfree

Dim $a_Array[1] 
MsgBox(0 + 64, "信息", "当前数组上限为: " & UBound($a_Array))
 
Dim $r = "", $n = -1
While 1
        $r = InputBox("重定义数组", "输入数组上限", "")
        If @error = 1 And $r = "" Then
                ExitLoop
        Else
                $n = Number($r)
                If $n <= 0 Then
                        MsgBox(0 + 48, "注意", "请输入正确的数组上限")
                Else
                        ExitLoop
                EndIf
        EndIf
WEnd

If $n > 0 Then
        ReDim $a_Array[$n]
        MsgBox(0 + 64, "信息", "重定义后数组上限为: " & UBound($a_Array))
EndIf

cxlater

#include <string.au3>
_arrayadd

zyfzyj

学习下！！！