VB.NET运算符代码示例解析
创始人
2024-06-20 18:31:45
0

VB.NET中存在着许多运算符供我们使用。如果能够熟练运用这些运算符,可以方便我们的程序开发,提高编程效率。下面我们就为大家介绍一下Is运算符以及运算符重载相关概念,希望能给大家对带来一些帮助。

VB.NET运算符之Is 运算符

Is运算符比较两个引用对象是否引用了同一实例。 例子如下:

  1. Dim a As New dog   
  2. Dim b As New dog()   
  3. If a Is b Then   
  4. MsgBox("True")   
  5. Else   
  6. MsgBox("False")   
  7. End If   
  8. b = a   
  9. b.Name = "NorthSnow"   
  10. If a Is b Then   
  11. MsgBox("True")   
  12. Else   
  13. MsgBox("false")   
  14. End If   
  15. 'false   
  16. 'true 

VB.NET运算符重载

我们可以根据需要对VB.NET运算符进行重载,本文中的 dog 类 就 对 + 操作符 进行了重载 操作。此时对两个dog 类进行相加时,会返回一个dog 类实例 ,他的 Name 是 那两个 dog 实例的 名字相加,年龄也是 dog 实例的年龄之和,颜色是两个颜色的平均值。例子如下:

  1. Dim sb As New System.Text.StringBuilder   
  2. Dim m As New dog   
  3. Dim n As New dog   
  4. Dim c As dog   
  5. m.Name = "NorthSnow"   
  6. c = m + n   
  7. sb.AppendLine()   
  8. sb.Append(m.Name)   
  9. sb.Append("--")   
  10. sb.Append(m.Age)   
  11. sb.Append("--")   
  12. sb.Append(m.Color.ToArgb)   
  13. sb.AppendLine()   
  14. sb.Append(n.Name)   
  15. sb.Append("--")   
  16. sb.Append(n.Age)   
  17. sb.Append("--")   
  18. sb.Append(n.Color.ToArgb)   
  19. sb.AppendLine()   
  20. sb.Append(c.Name)   
  21. sb.Append("--")   
  22. sb.Append(c.Age)   
  23. sb.Append("--")   
  24. sb.Append(c.Color.ToArgb)   
  25. MsgBox(sb.ToString)   
  26. 'NorthSnow--22---65536   
  27. '塞北的雪--22---65536   
  28. 'NorthSnow塞北的雪--44---65536  

VB.NET运算符的相关操作就为大家介绍到这里。

【编辑推荐】

  1. VB.NET文本框应用经验总结
  2. 轻松打造VB.NET文件合并示例
  3. VB.NET水晶报表优点及结果描述
  4. VB.NET指针在实际应用中作用体现
  5. VB.NET List实用技巧详解

相关内容

热门资讯

如何允许远程连接到MySQL数... [[277004]]【51CTO.com快译】默认情况下,MySQL服务器仅侦听来自localhos...
如何利用交换机和端口设置来管理... 在网络管理中,总是有些人让管理员头疼。下面我们就将介绍一下一个网管员利用交换机以及端口设置等来进行D...
施耐德电气数据中心整体解决方案... 近日,全球能效管理专家施耐德电气正式启动大型体验活动“能效中国行——2012卡车巡展”,作为该活动的...
Windows恶意软件20年“... 在Windows的早期年代,病毒游走于系统之间,偶尔删除文件(但被删除的文件几乎都是可恢复的),并弹...
20个非常棒的扁平设计免费资源 Apple设备的平面图标PSD免费平板UI 平板UI套件24平图标Freen平板UI套件PSD径向平...
德国电信门户网站可实时显示全球... 德国电信周三推出一个门户网站,直观地实时提供其安装在全球各地的传感器网络检测到的网络攻击状况。该网站...
着眼MAC地址,解救无法享受D... 在安装了DHCP服务器的局域网环境中,每一台工作站在上网之前,都要先从DHCP服务器那里享受到地址动...
为啥国人偏爱 Mybatis,... 关于 SQL 和 ORM 的争论,永远都不会终止,我也一直在思考这个问题。昨天又跟群里的小伙伴进行...