Page.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 Page-Objekt darstellt.
Hinweise
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.