Procedure: Een klasse gebruiken die operators definieert (Visual Basic)
Als u een klasse of structuur gebruikt die zijn eigen operators definieert, hebt u toegang tot deze operators vanuit Visual Basic.
Het definiëren van een operator in een klasse of structuur wordt ook wel overbelasting van de operator genoemd.
Opmerking
In het volgende voorbeeld wordt de SQL-structuur SqlStringgeopend, waarmee de conversieoperators (CType Function) in beide richtingen worden gedefinieerd tussen een SQL-tekenreeks en een Visual Basic-tekenreeks. Gebruik CType(sql-tekenreeksexpressie om String) een SQL-tekenreeks te converteren naar een Visual Basic-tekenreeks en CType(Visual Basic-tekenreeksexpressie, SqlString) om deze in de andere richting te converteren.
' Insert the following line at the beginning of your source file.
Imports System.Data.SqlTypes
Public Sub setJobString(ByVal g As Integer)
Dim title As String
Dim jobTitle As System.Data.SqlTypes.SqlString
Select Case g
Case 1
title = "President"
Case 2
title = "Vice President"
Case 3
title = "Director"
Case 4
title = "Manager"
Case Else
title = "Worker"
End Select
jobTitle = CType(title, SqlString)
MsgBox("Group " & CStr(g) & " generates title """ &
CType(jobTitle, String) & """")
End Sub
De SqlString structuur definieert een conversieoperator (CType-functie) van String naar SqlString en een andere van SqlString naar String. De instructie die wordt toegewezen title , jobTitle maakt gebruik van de eerste operator en de MsgBox functie-aanroep maakt gebruik van de tweede.
De code compileren
Zorg ervoor dat de klasse of structuur die u gebruikt de operator definieert die u wilt gebruiken. Neem niet aan dat de klasse of structuur elke operator heeft gedefinieerd die beschikbaar is voor overbelasting. Zie Operator-instructie voor een lijst met beschikbare operators.
Neem de juiste Imports instructie op voor de SQL-tekenreeks aan het begin van het bronbestand (in dit geval System.Data.SqlTypes).
Uw project moet verwijzingen hebben naar System.Data en System.XML.
