Rubrik: Controls · Sonstiges | VB-Versionen: VB4, VB5, VB6 | 14.10.05 |
Transparente CheckBox Mit einem kleinen Trick lässt sich die Standard CheckBox von Windows transparent darstellen. | ||
Autor: Dieter Otter | Bewertung: | Views: 14.778 |
www.tools4vb.de | System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Immer wieder gefragt: Wie lässt sich eine Standard CheckBox transparent darstellen?
Grund hierfür ist z.B. ein Fensterfarbverlauf oder ein Hintergrundbild, auf das die CheckBox dann eben transparent dargestellt werden soll.
Die Lösung ist recht simpel: Man nehme eine CheckBox ohne Caption (also kein Beschriftungstext). Die Größe der CheckBox setzt man dann auf 195 x 195 Twips, so dass nur noch das kleine CheckBox-Kästchen zu sehen ist. Für die noch fehlende Beschriftung platziert man rechts oder links neben der CheckBox ein ganz normales Label-Control, wobei die Eigenschaft BackStyle auf den Wert "0 - Transparent" festgelegt wird. Dann muss man nur noch das Click-Event des Labels mit der CheckBox synchronisieren, und schon haben wir eine transparente CheckBox
Private Sub Label1_Click() Check1.Value = Abs(Not CBool(Check1.Value)) End Sub