Jak: Użyj klasą rodzajową (Visual Basic)

Klasa, która ma Parametry typu jest nazywany klasą rodzajową.Jeśli używasz klasą rodzajową, można wygenerować skonstruowane klasy z niego, podając argumentu typu dla każdego z tych parametrów.Następnie można zadeklarować zmiennej typu klasy skonstruowane i można utworzyć instancję klasy skonstruowane i przypisać ją do tej zmiennej.

W uzupełnieniu do klas można również zdefiniować i użyć rodzajowy struktur, interfejsy, procedur i delegatów.

Poniższa procedura ma klasą rodzajową zdefiniowane w .NET Framework i tworzy instancję z niego.

Aby użyć klasy, która przyjmuje parametr typu

1. Na początku pliku źródłowego zawiera Przywóz instrukcji (.Obszar nazw netto i typ) do importowania System.Collections.Generic obszaru nazw.Dzięki temu można odwoływać się do System.Collections.Generic.Queue<T> klasa bez konieczności pełni zakwalifikować go na odróżnienie go od innych klas kolejki takie jak System.Collections.Queue.

2. Utwórz obiekt w normalny sposób, ale Dodaj (Oftype) zaraz po nazwie klasy. 

   W poniższym przykładzie użyto tej samej klasie (System.Collections.Generic.Queue<T>) do tworzenia dwóch obiektów kolejki, które zawierają elementy różnych typów danych.To dodaje elementy na końcu każdej kolejki a następnie usuwa i wyświetla elementy z przodu każdej kolejki.

   Public Sub usequeue()
     Dim queueDouble As New System.Collections.Generic.Queue(Of Double)
     Dim queueString As New System.Collections.Generic.Queue(Of String)
     queueDouble.Enqueue(1.1)
     queueDouble.Enqueue(2.2)
     queueDouble.Enqueue(3.3)
     queueDouble.Enqueue(4.4)
     queueString.Enqueue("First string of three")
     queueString.Enqueue("Second string of three")
     queueString.Enqueue("Third string of three")
     Dim s As String = "Queue of Double items (reported length " &
         CStr(queueDouble.Count) & "):"
     For i As Integer = 1 To queueDouble.Count
       s &= vbCrLf & CStr(queueDouble.Dequeue())
     Next i
     s &= vbCrLf & "Queue of String items (reported length " &
         CStr(queueString.Count) & "):"
     For i As Integer = 1 To queueString.Count
       s &= vbCrLf & queueString.Dequeue()
     Next i
     MsgBox(s)
   End Sub
   

Zobacz też

Zadania

Jak: zdefiniowanie klasy, która może dostarczyć identyczne funkcje dotyczące różnych typów danych (Visual Basic)

Informacje

Klauzuli (Visual Basic)

Przywóz instrukcji (.Obszar nazw netto i typ)

Koncepcje

Typy danych języka Visual Basic

Typy rodzajowe w języku Visual Basic (VB)

Common Language Specification

Inne zasoby

Iteratory (C# i Visual Basic)