Control.SizeToFit メソッド (Access)

SizeToFit メソッドを使用すると、コントロールのサイズが小さくなり、コントロールに含まれるテキストまたは画像に収まります。

構文

式。SizeToFit

式コントロール オブジェクトを表す変数。

注釈

たとえば、小さすぎて " Caption /標題" プロパティのすべてのテキストを表示できないコマンド ボタンに、 SizeToFit メソッドを適用できます。

SizeToFit メソッドは、フォームのデザイン ビューまたはレポートのデザイン ビューでのみ、コントロールに適用することができます。

SizeToFit メソッドは、含まれているテキストまたは画像のサイズに応じて、コントロールを大きくまたは小さくします。

SizeToFit メソッドと CreateControl メソッドを併用して、コード内に作成した新しいコントロールのサイズを変更します。

注:

[!メモ] テキストまたはイメージを含むすべてのコントロールのサイズが、 SizeToFit メソッドで変更できるわけではありません。 レコードごとにサイズが変わるデータにバインドされているコントロールもあります。 このようなコントロールには、テキスト ボックス、リスト ボックス、コンボ ボックス、連結オブジェクト フレームなどがあります。 SizeToFit メソッドは、データ アクセス ページのコントロールには適用できません。

例

次の例では、新しいフォームとそのフォーム上にコマンド ボタンを作成します。 次に、コントロールの " Caption /標題" プロパティを設定し、標題に合わせてコントロールの大きさを変更します。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。

  • Last updated on