這篇文章給大家介紹VB.NET中轉(zhuǎn)換運算符如何使用，內(nèi)容非常詳細，感興趣的小伙伴們可以參考借鑒，希望對大家能有所幫助。

在夏河等地區(qū)，都構(gòu)建了全面的區(qū)域性戰(zhàn)略布局，加強發(fā)展的系統(tǒng)性、市場前瞻性、產(chǎn)品創(chuàng)新能力，以專注、極致的服務(wù)理念，為客戶提供成都網(wǎng)站設(shè)計、成都網(wǎng)站制作 網(wǎng)站設(shè)計制作按需定制,公司網(wǎng)站建設(shè),企業(yè)網(wǎng)站建設(shè),品牌網(wǎng)站建設(shè),成都營銷網(wǎng)站建設(shè),外貿(mào)營銷網(wǎng)站建設(shè),夏河網(wǎng)站建設(shè)費用合理。

VB.NET轉(zhuǎn)換運算符示例

下面的示例定義名稱為 digit 的結(jié)構(gòu)與 Byte 之間的轉(zhuǎn)換運算符。

Visual Basic  
Public Structure digit  
Private dig As Byte  
Public Sub New(ByVal b As Byte)  
If (b < 0 OrElse b > 9) 
Then 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 Byte) As digit  
Return New digit(b)  
End Operator  
End Structure 

可以使用下面的代碼測試結(jié)構(gòu) 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 

關(guān)于VB.NET中轉(zhuǎn)換運算符如何使用就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，可以學(xué)到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。