在VB中不知道元素的个数怎样创建数组

Question

在VB中不知道元素的个数怎样创建数组！
我想从一个函数中传出一组数据，但是不知道这组数据中，有多少是符合我想要的数据，我想用数组传出。     

Answer 1

Private Function arr() As Variant()
Dim i As Long
For i = 0 To 100
ReDim Preserve arr(i) 'i是变量,可随时改变
arr(i) = i
Next
End Function

Answer 2

Private Function arr() As Variant()
Dim i As Long
For i = 0 To 100
ReDim Preserve arr(i) 'i是变量,可随时改变
arr(i) = i
Next
End Function

Answer 3

可以给函数传一个动态数组的byref参数，然后在函数体里redim这个动态数组。

Answer 4

确定个数后  用redim即可