当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > vb.net中应用 ArrayList 实例

ASP.NET
如何使用vb6.0来实现中文实名搜索
C#实现Window管道技术
记录下一些关于测试工具NUNIT的链接资料,有兴趣的朋友也可以跳过去看看
编写与.NET属性窗口交互的RAD组件(自序)
asp.net 关于form认证的一般设置:
编写与.NET属性窗口交互的RAD组件(一)
ActiveX控件的打包发布[无证书发布](一)
Visual SourceSafe 6.0 的问题思考
VB报表输出的问题,恳请不吝赐教
证书和签名--试用微软提供的证书测试工具系列
[dotNET]如何利用ConfigurationSettings.AppSettings.GetValues读取配置文件中多个...
使用C#编写DES加密程序的framework
令你的网页速度大大提高
怎样得到一个系统盘的全名,不是字符,是全名,如:本地磁盘(C:)?
r在richtextbox中插入动画/控件
Code: Writing Text to a File (Visual Basic)
算法讨论:哲学家就餐问题
我们所要关注的是什么?
firebird 连接嵌入式版本
从Csharp走到VB.Net(一):MyClass保留字

ASP.NET 中的 vb.net中应用 ArrayList 实例


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-23   浏览: 167 ::
收藏到网摘: n/a

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

  '塞北的雪

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