ArrayList 就是数组列表，它位于System.Collections名称空间下，是集和类型。与ArrayList 同胞的还有一个List，他们的实用很相似。这里我们只介绍一些关于ArrayList的一些东东。

ArrayList有三个构造器：

ArrayList()

ArrayList(int32)

ArrayList(ICollection)

一个简单的例子如下：

Dim t As New ArrayList() 

t.Add("Northsnow") 

Dim d As New Collection 

d.Add("塞北的雪") 

d.Add("http://blog.csdn.net/precipitant") 

t.AddRange(d) 

For Each aa As String In t 

MsgBox(aa.ToString()) 

Next 
'会依次输出： 

'Northsnow 

'塞北的雪 

'http://blog.csdn.net/precipitant 

ArrayList的构造器可以接受一个集合，例子如下：

Dim d As New Collection 

d.add("Northsnow") 

d.Add("塞北的雪") 

d.Add("http://blog.csdn.net/precipitant") 

Dim t As New ArrayList(d) 

Dim sb As New System.Text.StringBuilder() 

If t.Count > 0 Then 

sb.Append("ArrayList中共有 成员 ") 

sb.Append(t.Count.ToString) 

sb.Append(" 个") 

For Each aa As String In t 

sb.AppendLine() 

sb.Append(aa) 

Next 

End If 

MsgBox(sb.ToString) 

'最后输出结果为： 

'ArrayList中共有 成员 3 个 

'Northsnow 

'塞北的雪 

'http://blog.csdn.net/precipitant 

另外还可以给ArrayList的构造器传递一个整数，以设定ArrayList的初始容量。并可以通过更改Capacity属性的值更改 当前ArrayList的容量，也可以用TrimToSize方法将容量压缩成实际的元素数量，例子如下：

Dim t As New ArrayList(10) 

Dim d As New Collection 

d.Add("Northsnow") 

d.Add("塞北的雪") 

d.Add("http://blog.csdn.net/precipitant") 

t.AddRange(d) 

MsgBox(t.Capacity) 

t.Capacity = 6 

MsgBox(t.Capacity) 

t.TrimToSize() 

't.Capacity = t.Count 与 t.TrimToSize() 等效 

MsgBox(t.Capacity) 

'依次输出： 

'10 

'6 

'3 

由于ArrayList是集和类型，所以它具有一些集合的操作方法。比如遍历，查找，插入等操作。同时ArrayList还相当于一个大小可自由改变的一维数组。所以当然也可以象对待数组一样对他进行操作。

（责任编辑 火凤凰 sunsj@51cto.com  TEL：（010）68476636-8007）

频道声明：本频道的文章除部分特别声明禁止转载的专稿外，可以自由转载.但请务必注明出出处和原始作者 文章版权归本频道与文章作者所有.对于被频道转载文章的个人和网站,我们表示深深的谢意。 原始作者:佚名 录入时间:2007-1-7 17:59:23 信息来源:不详 投稿信箱:itqoo@126.com