vb.net中应用 ArrayList 实例

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还相当于一个大小可自由改变的一维数组。所以当然也可以像对待数组一样对他进行操作。