读取数据到数组，数组下标从0开始，看着不顺眼，想把数据从1开始，怎么办啊？

junziyeaicai

读取数据到数组，数组下标从0开始，看着不顺眼，想把数据从1开始，怎么办啊？
比如我获取的数据如下
Dim $Array[5][3]

$Array[0][0]=11
$Array[1][0]=21
$Array[2][0]=31
$Array[3][0]=41
$Array[4][0]=51

$Array[0][1]=12
$Array[1][1]=22
$Array[2][1]=32
$Array[3][1]=42
$Array[4][1]=52

$Array[0][2]=13
$Array[1][2]=23
$Array[2][2]=33
$Array[3][2]=43
$Array[4][2]=53
看是看着不顺眼，我想变成下面这样
$Array[1][1]=11
$Array[2][1]=21
$Array[3][1]=31
$Array[4][1]=41
$Array[5][1]=51

$Array[1][2]=12
$Array[2][2]=22
$Array[3][2]=32
$Array[4][2]=42
$Array[5][2]=52

$Array[1][3]=13
$Array[2][3]=23
$Array[3][3]=33
$Array[4][3]=43
$Array[5][3]=53

有没有好用的函数调用一下啊？

afan

#include <Array.au3>
_ArrayInsert($Array, 0, '')

junziyeaicai

afan 发表于 2018-11-4 10:25

好的谢谢，刚才怕麻烦所以发的一维数组，其实我需要的是二维数组，_ArrayInsert($Array, 0, '')好像不能插入二维数组，我自己写了个方法解决了。
#include <Array.au3>

Dim $Array[5][3]

$Array[0][0]=11
$Array[1][0]=21
$Array[2][0]=31
$Array[3][0]=41
$Array[4][0]=51

$Array[0][1]=12
$Array[1][1]=22
$Array[2][1]=32
$Array[3][1]=42
$Array[4][1]=52

$Array[0][2]=13
$Array[1][2]=23
$Array[2][2]=33
$Array[3][2]=43
$Array[4][2]=53

_ArrayDisplay($Array,"原数组")

$Array = __redim($Array)


_ArrayDisplay($Array,"调整后数组")


Func __redim(ByRef $aArray)
        ;数组1维长度
        Local $u1=UBound($aArray,1)
        ;数组2维长度
        Local $u2=UBound($aArray,2)
        ;调整数组长度+1
        ReDim $aArray[$u1+1][$u2+1]
        ;数组赋值后移
        For $i = $u1 To 1 Step -1
                For $j = $u2 To 1 Step -1
                        $aArray[$i][$j] = $aArray[$i - 1][$j - 1]        
                Next
        Next
        ;无用数组刷写无用数据
        $aArray[0][0] = ""
        For $i = $u1 To 1 Step -1
                $aArray[$i][0] = ""
                For $j = $u2 To 1 Step -1
                        $aArray[0][$j] = ""
                Next
        Next
    Return         $aArray
EndFunc        

duxing

这几天在折腾EXCEL和数组之间的切换，正好拿来用了

chishingchan

数组的[0]在很多语言中一般是记录数组的数量。

heroxianf

这个看使用场景吧，  有时候默认从0开始也是比较方便的。

hbwazxf

好久没来了。进来学习下……