office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access自動調整控件大小至閤適

2018-01-30 16:55:00
tmtony8
原創
9541

在Access中,我們創建的窗體裡麵有各種的控件。但是有時因爲樣式排版等問題,導緻控件的標題顯示不完整。

例如,在一箇太小、無法顯示其標題屬性中全部文本的命令按鈕 ,我們需要自動適應大小

這裡可以使用 SizeToFit 方法,可以調整控件的大小,使其能夠容納所包含的文本或圖像。


在窗體上創建一箇新的命令按鈕。然後設置控件的 Caption 屬性併調整控件的大小以容納標題。


創建源碼:

Sub SizeNewControl()
    Dim frm As Form, ctl As Control
    Set frm = CreateForm
    Set ctl = CreateControl(frm.Name, acCommandButton, , , , 500, 500)
    DoCmd.Restore
    ctl.Caption = "Office交流網 創建控件標題"
    ctl.SizeToFit
End Sub



註意:

SizeToFit 方法隻能在窗體設計視圖 報錶設計視圖中對控件應用 SizeToFit 方法。

SizeToFit 方法使控件變大還是變小,取決於牠所包含的文本或圖像的大小。

    分享