LabelTrasparent



Public Enum capBackStyle
Transparent = 0
Opaque = 1
End Enum
'_________________________________________________________


Public Property Let BackStyle(ByVal mData As capBackStyle)
mBackStyle = mData
UserControl.BackStyle = mData
If mData = Opaque Then
lblLabel.BackColor = UserControl.BackColor
Else
lblLabel.BackColor = Ambient.BackColor ' This sets the back
'color To the same as the container.

End If
PropertyChanged "BackStyle"
End Property


(labeltrasparent.html)- by Paolo Puglisi - Modifica del 25/3/2019