Public Class WrapperBase
    Protected _ctl As Control
 
    Public Property Text As String
        Set(value As String)
            _ctl.Text = value
        End Set
        Get
            Return _ctl.Text
        End Get
    End Property
 
    Public ReadOnly Property CtlRef As Control
        Get
            Return _ctl
        End Get
    End Property
End Class
 
 
Public Class Wrapper(Of T As Control)
    Inherits WrapperBase
 
    Public Sub New(c As T)
        _ctl = c
    End Sub
End Class