Freigeben über

Page-Objekt, MultiPage-Steuerelement, Add-, Clear-, Remove-Methode (Beispiel)

  • Artikel

Im folgenden Beispiel werden die Add-, Clear- und Remove-Methoden verwendet, um zur Laufzeit ein Steuerelement zu einer Page eines MultiPage-Steuerelements hinzuzufügen und zu entfernen.

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

  • Ein MultiPage -Objekt mit der Bezeichnung "MultiPage1".
  • Drei Befehlsschaltflächen-Steuerelemente ( CommandButton ) mit der Bezeichnung "CommandButton1" bis "CommandButton3".
Dim MyTextBox As Control 
 
Private Sub CommandButton1_Click() 
Set MyTextBox = MultiPage1.Pages(0).Controls.Add("MSForms" _ 
 & ".TextBox.1", "MyTextBox", Visible) 
End Sub 
 
Private Sub CommandButton2_Click() 
 MultiPage1.Pages(0).Controls.Clear 
End Sub 
 
Private Sub CommandButton3_Click() 
 If MultiPage1.Pages(0).Controls.Count > 0 Then 
 MultiPage1.Pages(0).Controls.Remove "MyTextBox" 
 End If 
End Sub 
 
Private Sub UserForm_Initialize() 
 CommandButton1.Caption = "Add control" 
 CommandButton2.Caption = "Clear controls" 
 CommandButton3.Caption = "Remove control" 
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.