VB.NET中转换运算符如何使用

这篇文章给大家介绍VB.NET中转换运算符如何使用,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。

在夏河等地区,都构建了全面的区域性战略布局,加强发展的系统性、市场前瞻性、产品创新能力,以专注、极致的服务理念,为客户提供成都网站设计、成都网站制作 网站设计制作按需定制,公司网站建设,企业网站建设,品牌网站建设,成都营销网站建设,外贸营销网站建设,夏河网站建设费用合理。

VB.NET转换运算符示例

下面的示例定义名称为 digit 的结构与 Byte 之间的转换运算符。

Visual Basic  Public Structure digit  Private dig As Byte  Public Sub New(ByVal b As Byte)  If (b < 0 OrElse b > 9Then Throw New _  System.ArgumentException("Argument outside range for Byte")  Me.dig = b End Sub  Public Shared Widening Operator CType(ByVal d As digit) As Byte  Return d.dig  End Operator  Public Shared Narrowing Operator CType(ByVal b As ByteAs digit  Return New digit(b)  End Operator  End Structure 

可以使用下面的代码测试结构 digit。

Visual Basic  Public Sub consumeDigit()  Dim d1 As New digit(4)  Dim d2 As New digit(7)  Dim d3 As digit = CType(CByte(3), digit)  Dim s As String = "Initial 4 generates " & CStr(CType(d1, Byte)) _  & vbCrLf & "Initial 7 generates " & CStr(CType(d2, Byte)) _  & vbCrLf & "Converted 3 generates " & CStr(CType(d3, Byte))  Try  Dim d4 As digit  d4 = CType(CType(d1, Byte) + CType(d2, Byte), digit)  Catch e4 As System.Exception  s &= vbCrLf & "4 + 7 generates " & """" & e4.Message & """"  End Try  Try  Dim d5 As digit = CType(CByte(10), digit)  Catch e5 As System.Exception  s &= vbCrLf & "Initial 10 generates " & """" & e5.Message & """"  End Try  MsgBox(s)  End Sub 

关于VB.NET中转换运算符如何使用就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。

网站名称:VB.NET中转换运算符如何使用
文章来源:https://www.cdcxhl.com/article10/goiddo.html

成都网站建设公司_创新互联,为您提供服务器托管网页设计公司软件开发小程序开发用户体验品牌网站制作

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联

搜索引擎优化