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