墙上那一串串红辣椒——数组入门讲座

liaoyaming

太强了，真是大师啊

jayzoudequan

太厉害，学习了·······

热浪2006

很是精彩，非常实用！
想请教山菊花版主，如何纵（横）向连接两个二维数组？
如：arr1是100行5列、arr2是50行5列，连接后为150行5列且原数据不丢？
或：arr3是4行50列、arr4是4行40列，连接后为4行90列且原数据不丢？

系统没有提供像连接字符串一样简单的函数或语句供数组使用。在实际运用中，我们只能向蚂蚁学习，把这个家的东西一件一件对号入座挪向另一个家。
首先用ReDim语句将指定数组的地盘扩大，为了保留原数据，需要使用关键字Preserve，使用时要注意，该方法只能改变数组末维的大小，举例如一个二维数组，只能改变第2维的大小，详见帮助。
上例中，合并arr3与arr4，代码为：
ReDim Preserve arr3(1 To 4, 1 To 90)
For i = 1 To 4
    For j = 1 To 40
        arr3(i, 50 + j) = arr4(i, j)
    Next
Next
受ReDim限制，不能用该方法直接合并arr1与arr2。
--山菊花

tong01

谢谢老师了，上网能跟老师学到东西感觉很充实，头也不晕了，哈哈

yangshengli

不错,收下了!

mis2000

经典之作，5年之后学习依然津津有味，感谢山版。

热浪2006

先谢谢山菊花版主赐教！我一直也是用扩充数组再追加数据的办法，今得知别无简易他法，虽有些惆怅，但也算是验证了，静心了。

梦竹2

收藏起来,慢慢学习,谢谢老师.{:soso_e179:}

wlianke

山菊花版主，高手出招！

alex_bn_lee

{:soso_e122:}经典的红辣椒数组~