Procedura: definire un operatore di conversione (Visual Basic)
Una volta definita una classe o una struttura, è possibile definire gli operatori di conversione dei tipi tra il tipo della classe o della struttura e un altro tipo di dati (ad esempio Integer, Double o String).
Definire la conversione dei tipi come routine Funzione CType (Visual Basic) all'interno della classe o della struttura.Tutte le routine di conversione devono essere Public Shared e ognuna deve specificare Widening (Visual Basic) oppure Narrowing (Visual Basic).
La definizione di un operatore su una classe o una struttura viene anche detta overload dell'operatore.
Esempio
Nell'esempio riportato di seguito vengono definiti gli operatori di conversione tra una struttura denominata digit e un Byte.
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
È possibile testare la struttura digit mediante il codice riportato di seguito.
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
Vedere anche
Attività
Procedura: definire un operatore (Visual Basic)
Procedura: chiamare una routine di operatore (Visual Basic)
Procedura: utilizzare una classe che definisce gli operatori (Visual Basic)
Procedura: dichiarare una struttura (Visual Basic)
Riferimenti
Concetti
Routine di operatore (Visual Basic)