Breadcrumbs

[M1z23R]

So, i am making Completly custom tab control, so far i am able to draw tabs and navigate through tabs, but i am trying to make TabPages Property, i\ve found something, but idk why does it change each time i debug - it \forgets\ all the items.

I made another class TabPageCollection

Code: Select all

Public Class TabPageCollection
Inherits CollectionBase

 Public Sub Add(ByVal tb As iTabPage)
        List.Add(tb)
    End Sub

    Public Sub Remove(ByVal index As Integer)
        If index > Count - 1 Or index < 0 Then
            Console.WriteLine("Can't add this item")
        Else
            List.RemoveAt(index)
        End If
    End Sub

    Default Public ReadOnly Property Item(ByVal index As Integer) As iTabPage
        Get
            Return CType(List.Item(index), iTabPage)
        End Get
    End Property
End Class

Public Class Form1

Private _TabPages as TabPageCollection
Property TabPages As TabPageCollection
Get
return(_tabpages)
End Get
Set (ByVal Value as iTabPage)
_TabPages = value
End Set
End Property

End Class

How do i make this work ?