Option Strict On
Imports System.Collections
Public Class TokenCollection
Inherits CollectionBase
Public Sub Add(ByVal aToken As String)
Me.List.Add(aToken)
End Sub
Public ReadOnly Property Item(ByVal index As Integer) As String
Get
Return DirectCast(Me.List.Item(index), String)
End Get
End Property
Public Sub Remove(ByVal aToken As String)
Me.List.Remove(aToken)
End Sub
End Class