ArrayList 就是数组列表它位于 SystemCollections名称空间下是集和类型 与 ArrayList 同胞的还有一个List他们的实用很相似我们只介绍一些关于ArrayList的一些东东
ArrayList有三个构造器:
ArrayList()
ArrayList(int)
ArrayList(ICollection)
一个简单的例子如下
Dim t As New ArrayList()
tAdd(Northsnow)
Dim d As New Collection
dAdd(塞北的雪)
dAdd()
tAddRange(d)
For Each aa As String In t
MsgBox(aaToString())
Next
会依次输出
Northsnow
塞北的雪
ArrayList的构造器可以接受一个集和例子如下
Dim d As New Collection
dadd(Northsnow)
dAdd(塞北的雪)
dAdd()
Dim t As New ArrayList(d)
Dim sb As New SystemTextStringBuilder()
If tCount > Then
sbAppend(ArrayList中共有 成员 )
sbAppend(tCountToString)
sbAppend( 个)
For Each aa As String In t
sbAppendLine()
sbAppend(aa)
Next
End If
MsgBox(sbToString)
最后输出结果为
ArrayList中共有 成员 个
Northsnow
另外还可以给 ArrayList的构造器传递一个整数以设定ArrayList的初始容量并可以通过 更改 Capacity属性的值更改 当前 ArrayList的容量也可以用 TrimToSize方法将容量压缩成实际的元素数量例子如下
Dim t As New ArrayList()
Dim d As New Collection
dAdd(Northsnow)
dAdd(塞北的雪)
dAdd()
tAddRange(d)
MsgBox(tCapacity)
tCapacity =
MsgBox(tCapacity)
tTrimToSize()
tCapacity = tCount 与 tTrimToSize() 等效
MsgBox(tCapacity)
依次输出
由于ArrayList是集和类型所以它具有一些集和的操作方法比如 遍历查找插入 等操作同时 ArrayList还相当于一个大小可自由改变的一维数组所以当然也可以像对待数组一样对他进行操作
