转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> VB.NET程序 >> 正文
向Visual Basic程序员介绍泛型(二)         ★★★★

向Visual Basic程序员介绍泛型(二)

作者:闵涛 文章来源:闵涛的学习笔记 点击数:1570 更新时间:2009/4/23 18:59:08

(接上篇)

正如你所见,泛型使用起来很简单。强类型化的代码可以避免运行时错误;智能感知会工作得更好。虽然使用泛型已经有非常充分的理由,不过使用泛型还有更多的优点:性能和代码重用。

将泛型技术引入.Net框架的一个主要原因是为了提高性能。比如集合类可以比以前工作得更快,因为编译器能够针对集合所储存的类型进行优化。下面的代码比较了数组、ArrayList以及泛型List的性能:

        txtOutput.Text = "Performance" & vbCrLf

 

        Const iterations As Integer = 5000000

        PerfTime.Start()

        Dim myArray(iterations) As Integer

        For i As Integer = 0 To iterations - 1

            myArray(i) = i

        Next

        Dim elapsed As Integer = PerfTime.Stop

        txtOutput.Text &= "Array time: " & elapsed & vbCrLf

        myArray = Nothing

        GC.Collect()

 

        PerfTime.Start()

        Dim myArrayList As New ArrayList

        For i As Integer = 0 To iterations - 1

            myArrayList.Add(i)

        Next

        elapsed = PerfTime.Stop

        txtOutput.Text &= "ArrayList time: " & elapsed & vbCrLf

        myArrayList = Nothing

        GC.Collect()

 

        PerfTime.Start()

        Dim myList As New List(Of Integer)

        For i As Integer = 0 To iterations - 1

            myList.Add(i)

        Next

        elapsed = PerfTime.Stop

        txtOutput.Text &= "List time: " & elapsed & vbCrLf

        myList = Nothing

        GC.Collect()

这段代码在固定长度的数组中储存了500万个数值,同时也在自动增长的ArrayList和泛型List中储存同样多的数值,性能数值看起来非常有趣:

Array 时间: 344

ArrayList时间: 4656

List时间: 797

有特定类型的定长数组有无与伦比的速度,而且不需要为改变大小付出代价。而集合类型的大小都是自动增长,如果有固定数组1/2的性能是相当不错的。接下来看看ArrayList,非常不幸,只有固定数据1/10的性能。问题出在ArrayList被设计成储存引用型变量,Integer是值类型,在储存到ArrayList以前要经过“装箱”操作,将Integer转为Object型。装箱的代价是非常昂贵的,所以当你储存值类型数据(如Integer、Date、Boolean以及你自己创建的Structure等)时,使用泛型将获得非常可观的性能提升。

更多关于“装箱”和“拆箱”操作的信息,请参见MSDN库中的“装箱转换”和“拆箱转换”

创建泛型类型和方法

并不是只能使用Visual Basic.Net提供的泛型类型,你可以创建你自己的泛型类型和方法。

泛型方法

当你想实现一些不与特定类型相关的一般算法时,你可能想创建泛型方法。举个例子,典型的冒泡排序需要遍历数组中的所有项目,两两比较,并交换需要排序的数值。

如果你已经确定只要进行整数的排序,你可以简单地编写一个只能用于Integer类型的Swap方法。但是如果你想能够排序任何类型,你就可以编写一个泛型Swap方法如下:

Private Sub Swap(Of ItemType) _

    (ByRef v1 As ItemType, ByRef v2 As ItemType)

 

    Dim temp As ItemType

    temp = v1

    v1 = v2

 &

[1] [2] [3]  下一页


[VB.NET程序]Visual Basic 6 逆向工程与反逆向工程 (2)  [VB.NET程序]Visual Basic 6 逆向工程与反逆向工程 (1)
[VB.NET程序]用Visual Basic创建复杂窗体  [VB.NET程序]Visual Basic的类对于面向对象的支持
[VB.NET程序]如何在Visual Basic 6.0 中连接加密的Access数据库  [VB.NET程序]使用Visual Basic操纵XML文档
[VB.NET程序]Visual Basic.Net连各种数据库的几种方法  [VB.NET程序]Visual Basic .NET资源工具包
[VB.NET程序]效率提高两倍!——Visual Basic.net 新力量  [VB.NET程序]复杂和高效——Visual Basic.net新力量
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台