新手问“动态数组”问题，很简单的~~~谢谢
如果不晓得要在一个数组中添加多少元素，就应使用动态数组，那么，如果我不知道多少元素，就先往里面添元素，然后根据我实际添加的元素来决定长度，该如何做呢？我问过个人，他说用
Dim a() As Integer
Dim b As Integer
For b = 1 To 100
a(b) = b
Next
ReDim a(b)
但是，这种方法依然是我知道了我要填写100个，才往里面添的。请问各位，有好的办法么？
__________________________________________________________________________
用ArrayList

*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)

最新版本：20070212

http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
List __________________________________________________________________________ redim Preserve __________________________________________________________________________ 你的代码行不通,在ReDim a(b)之前不可能实现a(b) = b 通常有两种方法： 1、如果你知道数组元素最多不会超过N个 Dim a() As Integer Dim i As Integer = 0 Redim a(n) while 未满足你的完成条件时 a(i) = 值 i+=1 end while ReDim Preserve a(i-1) 只在最后做一遍带值重分配，效率较高。 2、如果无法估计数组元素最高上限，又在任何时刻吝啬每一字节内存（移动设备开发？） Dim a() As Integer Dim i As Integer = 0 while 未满足你的完成条件时 ReDim Preserve a(i) a(i) = 值 i+=1 end while 不断地带值重分配，效率自然就下来了 __________________________________________________________________________ 谢谢~~~~~~~~~~~ __________________________________________________________________________ 我也遇到的问题，解决了 http://community.csdn.net/Expert/topic/5333/5333341.xml?temp=.2984735 __________________________________________________________________________ 原文链接：https://www.f2er.com/vb/263560.html