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