axis000 发表于 2009-2-25 21:02:38

数组拆分的问题?敬清高手帮忙!

已有一个内含55个元素的一维数组,我要把它们11个划分为一组,再组成5个二维数组,我用for... to...next,没搞明白,倒把自己搞晕了,请问有没有按数量分组的命令,我是新新手,望大侠们赐教!!

[ 本帖最后由 axis000 于 2009-2-26 09:40 编辑 ]

axis000 发表于 2009-2-25 21:09:13

帮我看看,$temp是那个一维数组:

Dim $ccc
For $u=1 To 5
        For $y=1 To 11
                $ccc[$u][$y]=$temp
        Next
       
Next

[ 本帖最后由 axis000 于 2009-2-25 21:11 编辑 ]

cnsnc 发表于 2009-2-26 09:13:41

#include<array.au3>
Dim $array,$b
For $i=0 to 54
        $array[$i]=$i
Next
;----------------------------------------
For $i=0 to 4
        For $j=0 to 10               
                $b[$i][$j]=$array[$j+$i*11]
        Next
Next
_ArrayDisplay($b)
;-----------------------------------------
For $i=0 to 54 Step 11
        for $j=0 to 10
                $b[$i/11][$j]=$array[$i+$j]
        Next
Next
_ArrayDisplay($b)               
;-----------------------------------------
Dim $n=-1
For $i=0 to 54
        $n+=1
        $b[($i-$n)/11][$n]=$array[$i];$b[$n]=$array[$i]也可以
        If $n>=10 Then $n=-1
Next
_ArrayDisplay($b)

axis000 发表于 2009-2-26 09:39:53

多谢,多谢提供这么多.慢慢研究,还没有转过弯来.:face (26):
页: [1]
查看完整版本: 数组拆分的问题?敬清高手帮忙!