Question

怎样在VB.NET中，定义了一个不知大小的一维数组，然后给这个数组添加值

意思就是：定义一个一维数组a()，把每次计算完的一个数值y，放在这个数组中，怎么样编写格式啊？注意是VB.NET中哈。谢谢！

Answer 1

使用动态定义
ReDim a() AS **********'定义一个动态数组
...........
计算出第一个Y
ReDim a(0)
a(0)=Y
.....................
计算出第二个Y
ReDim Preserve a(1) '再次分配元素并保留原有元素
a(1) =Y
.........................
.........................
ReDim Preserve a(N) '第N次分配元素并保留原有元素
a(N) =Y

Answer 2

Dim a() as integer '定义一个动态整形数组
。。。。
Redim Preserve a(10) '重定义大小，并且不破坏已存在的值

Answer 3

初始化后a.Length可以得到数组a()的元素个数，然后ReDim Preserve a(原来长度+1)
注意，第一次必须初始化

Answer 4

Imports System.Colection '可以用集合类 List<T>
private sub Test()
dim lst = new List(of int)() 'List可以自动变长
lst.Add(getY())
lst.Add(getY())
end sub
private function GetY()
return DateTime.Now.Ticks
end function