Chinaunix首页 | 论坛 | 博客
  • 博客访问: 743846
  • 博文数量: 769
  • 博客积分: 6000
  • 博客等级: 准将
  • 技术积分: 4985
  • 用 户 组: 普通用户
  • 注册时间: 2008-10-15 16:37
文章分类

全部博文(769)

文章存档

2011年(1)

2008年(768)

我的朋友

分类:

2008-10-15 16:38:05

  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

 

[1]  

【责编:Luzi】

--------------------next---------------------

阅读(282) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~