ListBox.SizeToFit-Methode (Access)

Verwenden Sie die SizeToFit-Methode , um ein Steuerelement so zu dimensionieren, dass es dem darin enthaltenen Text oder Bild entspricht.

Syntax

Ausdruck. SizeToFit

Ausdruck Eine Variable, die ein ListBox-Objekt darstellt.

HinwBemerkungeneise

Sie können beispielsweise die SizeToFit-Methode auf eine Befehlsschaltfläche anwenden, die zu klein ist, um den gesamten Text in der Caption-Eigenschaft anzuzeigen.

Sie können die SizeToFit-Methode nur in der Formularentwurfsansicht oder in der Berichtsentwurfsansicht auf Steuerelemente anwenden.

Die SizeToFit-Methode macht ein Steuerelement je nach Größe des darin enthaltenen Texts oder Bilds größer oder kleiner.

Verwenden Sie die SizeToFit-Methode in Verbindung mit der CreateControl-Methode , um neue Steuerelemente zu dimensionieren, die Sie im Code erstellt haben.

Hinweis

Nicht alle Steuerelemente, die Text oder ein Bild enthalten, können mit der SizeToFit-Methode vergrößert oder verkleinert werden. Einige Steuerelemente sind an Daten gebunden, deren Größe sich von einem Datensatz zum nächsten ändern kann. Zu diesen Steuerelementen gehören folgende: Textfeld, Listenfeld, Kombinationsfeld und Gebundenes Objektfeld. Die SizeToFit-Methode betrifft keine Steuerelemente in Datenzugriffsseiten.

Beispiel

Im folgenden Beispiel werden ein neues Formular und eine Befehlsschaltfläche im Formular erstellt. Die Prozedur stellt anschließend die Caption-Eigenschaft des Steuerelements ein und passt die Größe des Steuerelements an die Beschriftung an.

Sub SizeNewControl() 
 Dim frm As Form, ctl As Control 
 
 ' Create new form. 
 Set frm = CreateForm 
 ' Create new command button. 
 Set ctl = CreateControl(frm.Name, _ 
 acCommandButton, , , , 500, 500) 
 ' Restore form. 
 DoCmd.Restore 
 ' Set control's Caption property. 
 ctl.Caption = "Extremely Long Control Caption" 
 ' Size control to fit caption. 
 ctl.SizeToFit 
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.