动态数组是否更节省时间和资源？

fxl447098457

        我们经常使用动态数组，可能会认为,动态数组能够根据实际的需要,调整数组的长度,这样可以保证数组的长度刚好符合我们存放的数据量。而不出现多余的空数组元素。从而节省时间和资源。下面我们来看下例子。

1. Sub test1() '固定数组 我电脑上耗费时间0.0000秒
   
2. Dim arr(1 To 50000), i As Integer, t
   
3. t = Timer
   
4. For i = 1 To 10000 Step 1
   
5.     arr(i) = i
   
6. Next
   
7. MsgBox Format(Timer - t, "耗时0.0000秒")
   
8. End Sub
   
9. Sub test2() '动态数组  我电脑上耗费时间0.0078秒
   
10. Dim brr(), i As Integer, t
    
11. t = Timer
    
12. For i = 1 To 10000 Step 1
    
13. ReDim Preserve brr(1 To i)
    
14.     brr(i) = i
    
15. Next
    
16. MsgBox Format(Timer - t, "耗时0.0000秒")
    
17. End Sub

复制代码

        上面的两个过程里面test1和test2过程分别定义了两个数组arr(50000长度的固定数组),brr(动态数组),同样写入10000的数据,根据我的电脑环境测试,使用固定数组可以瞬间完成,而使用动态数组则花了0.0078秒。前者比后者要快一点。

下面我们再测试一下写入800000的数据量。

1. Sub test3() '固定数组  我电脑上耗费时间0.0195秒
   
2. Dim arr(1 To 1000000), i As Long, t
   
3. t = Timer
   
4. For i = 1 To 800000 Step 1
   
5.     arr(i) = i
   
6. Next
   
7. MsgBox Format(Timer - t, "耗时0.0000秒")
   
8. End Sub
   
9. Sub test4() '动态数组  我电脑上耗费时间12.7656秒
   
10. Dim brr(), i As Long, t
    
11. t = Timer
    
12. For i = 1 To 800000 Step 1
    
13. ReDim Preserve brr(1 To i)
    
14.     brr(i) = i
    
15. Next
    
16. MsgBox Format(Timer - t, "耗时0.0000秒")
    
17. End Sub

复制代码

        上面的两个过程里面test3和test4过程分别定义了两个数组arr(1000000长度的固定数组),brr(动态数组),同样写入800000的数据,根据我的电脑环境测试,使用固定数组耗时0.0195秒完成,而使用动态数组则花了12.7656秒。这个情况下前者比后者要快很多。

        通过上面的比较，我们可以看出在调整数组长度的时候会消耗计算机资源。频繁的调整数组长度,会耗费不少时间，而这也违背了我们使用数组的初衷。所以一般对于数据量相对比较大的时候，还是建议直接给数组指定一个较大的上限,这样所造成的浪费要低于频繁更改数组长度所造成的消耗。

看见星光

o(∩_∩)o ~Preserve本来就慢的，它实际上也是在内存中开了新数组，又把旧数组的数据移过去。。，此外它还有维度的限制。

hhjjpp

集合不需要声明下限，但是无法一股脑向单元格区域赋值，甚是可惜！
数组呢就是扩展麻烦，难以普适！

wzsy2_mrf

有时候问题规模不好估计，特别是变化较大的时候，用动态数组是不得已的。

wzsy2_mrf

任用动态数组的目的不在于节省时间，而是为了适应问题，节省资源。你使用固定数组，那么当问题超出设定的时候会出现错误，当问题的规模远小于设定的时候则会浪费资源。所以，光从时间角度去看动态数组并不适当。

xdwy81129

楼主换电脑没有，对于电脑高手应该要好点的电脑才对得起楼主的才华

这是我电脑测是时间

excelvlookup

据我所知，动态数组长度是按2的阶乘增加的，所以使用动态数组并不一定且很大可能不能节约空间。