Sdílet prostřednictvím

Postupy: Použití třídy, která definuje operátory (Visual Basic).

  • Článek

Pokud používáte třídu nebo strukturu, která definuje vlastní operátory, můžete k těmto operátorům přistupovat z jazyka Visual Basic.

Definování operátoru pro třídu nebo strukturu se také označuje jako přetížení operátoru.

Příklad

Následující příklad přistupuje ke struktuře SqlStringSQL, která definuje operátory převodu (funkce CType) v obou směrech mezi řetězcem SQL a řetězcem jazyka Visual Basic. Pomocí CType(výrazu String)řetězce SQL převeďte řetězec SQL na řetězec jazyka Visual Basic a CType(výraz řetězce jazyka Visual Basic k SqlString) převodu v opačném směru.

' 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

Struktura SqlString definuje operátor převodu (funkce CType) z String a SqlString jiného z SqlString do String. Příkaz, který se přiřadí title k jobTitle použití prvního operátoru MsgBox , a volání funkce používá druhou.

Kompilace kódu

Ujistěte se, že třída nebo struktura, kterou používáte, definuje operátor, který chcete použít. Nepředpokládá se, že třída nebo struktura definovaly všechny operátory, které jsou k dispozici pro přetížení. Seznam dostupných operátorů naleznete v části Příkaz operátoru.

Na začátku zdrojového souboru zahrňte odpovídající Imports příkaz pro řetězec SQL (v tomto případě System.Data.SqlTypes).

Projekt musí obsahovat odkazy na System.Data a System.XML.

Viz také