OK, I found a way. The class
@stevel05 required this code for me:
Public Sub GetBase As Pane
Return mBase
End Sub
Public Sub setVisible(Visible As Boolean)
mBase.Visible = Visible
End Sub
Public Sub getVisible As Boolean
Return mBase.Visible
End Sub
Public Sub getEnable As Boolean
Return mBase.Enabled
End Sub