5.25 Wie ändere ich die Schriftfarbe bei einen CommandButton?
VB5-VB6
Von: Thorsten Dörfler
Das CommandButton-Steuerelement sieht keine Eigenschaft vor, die Schriftfarbe festzulegen. Als Alternative können Sie eine CheckBox verwenden. Wenn Sie die Style-Eigenschaft auf 1-Grafisch festlegen, nimmt diese das Aussehen eines CommandButton an und stellt den Text in der über die ForeColor-Eigenschaft eingestellte Farbe dar.
Damit sich die CheckBox auch wie ein CommandButton verhält, müssen Sie im Click-Ereignis noch den Status zurücksetzen. Beachten Sie, dass das Click-Ereignis zweimal ausgeführt wird und Sie ihre Aktion innerhalb der Bedingungsprüfung ausführen:
Private Sub Check1_Click() If Check1.Value = vbChecked Then Check1.Value = vbUnchecked Debug.Print "Action!" End If End Sub
Sollten Sie für Ihre Anwendung die mit Windows XP eingeführten visuellen Stile aktiviert haben, wird eine solche CheckBox dennoch im klassischen Windows-Stil gezeichnet und hebt sich damit vom Standard CommandButton ab.