Beispiel für CheckBox-Steuerelement, Enabled- und Locked-Eigenschaften

Das folgende Beispiel veranschaulicht, wie sich die Enabled - und Locked -Eigenschaften gegenseitig ergänzen. Dieses Beispiel setzt für jede Eigenschaft unabhängig voneinander ein Kontrollkästchen-Steuerelement ( CheckBox ) ein, damit Sie die Einstellungen einzeln und kombiniert überprüfen können.

Darüber hinaus wird in diesem Beispiel ein zweites Textfeld-Steuerelement ( TextBox ) eingesetzt, damit Sie Informationen zwischen den Textfeld-Steuerelementen ( TextBox ) kopieren und einfügen sowie die von diesen Eigenschaften unterstützten Optionen überprüfen können.

Hinweis

[!HINWEIS] Mit STRG+C kopieren Sie eine Auswahl in die Zwischenablage, und mit STRG+V fügen Sie die Auswahl aus der Zwischenablage ein.

Kopieren Sie diesen Beispielcode in den Deklarationsbereich eines Formulars. Stellen Sie sicher, dass das Formular folgende Komponenten enthält:

• A TextBox named TextBox1.
• Zwei Kontrollkästchen-Steuerelemente ( CheckBox ) mit der Bezeichnung "CheckBox1" und "CheckBox2".
• Ein zweites Textfeld-Steuerelement ( TextBox ) mit der Bezeichnung "TextBox2".

Private Sub CheckBox1_Change() 
 TextBox2.Text = "TextBox2" 
 TextBox1.Enabled = CheckBox1.Value 
End Sub 
 
Private Sub CheckBox2_Change() 
 TextBox2.Text = "TextBox2" 
 TextBox1.Locked = CheckBox2.Value 
End Sub 
 
Private Sub UserForm_Initialize() 
 TextBox1.Text = "TextBox1" 
 TextBox1.Enabled = True 
 TextBox1.Locked = False 
 
 CheckBox1.Caption = "Enabled" 
 CheckBox1.Value = True 
 
 CheckBox2.Caption = "Locked" 
 CheckBox2.Value = False 
 
 TextBox2.Text = "TextBox2" 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.