Sdílet prostřednictvím

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

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ýrazuString) ř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 do SqlString a jiný z SqlString do String. Příkaz, který přiřazuje title k jobTitle, využívá prvního operátoru, a volání funkce používá druhý.

Kompilace kódu

Ujistěte se, že třída nebo struktura, kterou používáte, definuje operátor, který chcete použít. Nepředpokládejte, že třída nebo struktura má definované všechny dostupné operátory 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é

  • Last updated on