充满魅惑的GetType(VB2005)

简介:   了解C#的人对typeof这个关键字再熟悉不过了。它是获得对象的类别,返回值是type。   在VB2005中和typeof对位的是GetType。可是,GetType的使用却充满着魅惑性。先看看下面的代码。

  了解C#的人对typeof这个关键字再熟悉不过了。它是获得对象的类别,返回值是type。

  在VB2005中和typeof对位的是GetType。可是,GetType的使用却充满着魅惑性。先看看下面的代码。

  Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _

                        MyBase.Load

    Debug.Print(IsSame(New SolidBrush(Color.AliceBlue)))

  End Sub

  Private Function IsSame(ByVal Brush As Brush) As Boolean

    Dim T1 As Type = GetType(Brush)

    Dim T2 As Type = Brush.GetType

    Return T1 Is T2

  End Function

  这段代码执行完后,会在“即时窗口”里显示什么?

  False,你想到了吗?

  笔者在移植一段C#代码到VB2005代码时就碰到了如上的陷阱,使得代码在C#中运行正常,而在VB2005中就一直报错。后来才明白其中的奥妙。

  先仔细分析IsSame中的两句代码。

  Dim T1 As Type = GetType(Brush)

  GetType是关键字,获得指定类的Type。这里的Brush表示的是类Brush,T1得到的值是类Brush

  Dim T2 As Type = Brush.GetType

  GetType是对象的方法,返回该对象的Type。这里的Brush表示的传递进来的参数,T2得到的是参数Brush的类型,是类SolidBrush(应该是结构)

  很显然T1和T2不表示同一种类,故返回值是False

  其实,上面这段代码如果改写成容易识别的就一点问题都没有了。如下:

   Private Function IsSame(ByVal B As Brush) As Boolean

    Dim T1 As Type = GetType(Brush)

    Dim T2 As Type = B.GetType

    Return T1 Is T2

  End Function

  要熟悉GetType的两种用法,才能明白其中的奥妙,在移植代码的时候才不易出错。

相关文章
|
2月前
|
XML 开发框架 安全
从初学者到专家:掌握VB语言的10个技巧
【4月更文挑战第27天】本文介绍了10个关键技巧和最佳实践,助力Visual Basic初学者进阶为专家。包括理解基础概念与语法、精通事件驱动编程、面向对象编程、数据访问技术、异常处理、使用集合和泛型、代码性能优化、版本控制与团队协作、持续学习新特性和技术,以及通过实践提升技能。成为VB专家不仅需掌握语法,更在于解决问题和适应技术发展。
|
12月前
|
API
vb百例完成小结
vb百例完成小结
54 0
|
12月前
|
人工智能 Windows
VB课本总结(2)
VB课本总结(2)
58 0
|
12月前
|
数据可视化 数据库管理
vb课本总结
vb课本总结
36 0
刘金玉的零基础VB教程070期:贪吃蛇游戏开发第六节 记分与故障排除
刘金玉的零基础VB教程070期:贪吃蛇游戏开发第六节 记分与故障排除
|
监控 Windows
VB游戏开发#001植物大战僵尸小游戏开发思路说明及源码
VB游戏开发#001植物大战僵尸小游戏开发思路说明及源码
360 0
对比十二年前的vb代码,发现了点有意思的东西
对比十二年前的vb代码,发现了点有意思的东西
147 0
对比十二年前的vb代码,发现了点有意思的东西
VB编程的好帮手--【VB源码之友】快速进阶
B源码之友是VB软件开发的好助手,它即能规范源码开发的格式,又能提高编程的速度,是一款不可多得的好工具
2399 0