none
TabControl heredado no funciona RRS feed

  • Pregunta

  • Buen día lista cree una un tabcontrol personalizado, el código es el siguiente:

    Option Explicit On
    Imports System.Windows.Forms
    
    Public Class dbtabcontrol
        Inherits TabControl
    
        Public Property AllTabPages As List(Of TabPage)
    
        Sub New()
            Me.AllTabPages = New List(Of TabPage)
        End Sub
    
        Public Sub HideTabPage(ByVal par_tab_page As TabPage)
            If Me.TabPages.Contains(par_tab_page) Then
                For Each tab As TabPage In Me.TabPages
                    If Not Me.AllTabPages.Contains(tab) Then
                        Me.AllTabPages.Add(tab)
                    End If
                Next
    
                Me.TabPages.Remove(par_tab_page)
            End If
        End Sub
    
        Public Sub ShowTabPage(ByVal par_tab_page As TabPage)
            If Me.AllTabPages.Contains(par_tab_page) And Me.TabPages.Contains(par_tab_page) Then
                Me.TabPages.Add(par_tab_page)
            End If
        End Sub
    
    End Class

    genero el código y añado el control a la barra de controles, sin embargo cuando arrastro el control a mi formulario no lo agrega, no sucede nada de nada, al parecer el control no esta siendo agregado.

    Alguna sugerencia.

    • Cambiado Enrique M. Montejo lunes, 2 de junio de 2014 15:23 Pregunta sobre controles de Windows Forms.
    viernes, 30 de mayo de 2014 16:40