構文
構文は以下の通りです。
テキストボックス名.TextAlign = 表示位置
解説
テキストボックス内の文字の表示位置を設定するためには、TextAlignを使用します。テキストが左寄せ、中央揃え、または右寄せになるように設定できます。
【表示位置】
| 定数 | 内容 |
| mTextAlignLeft | テキストを左寄せにする |
| fmTextAlignCenter | テキストを中央揃えにする |
| fmTextAlignRight | テキストを右寄せにする |
プログラミング例
具体的なプログラミング例を紹介します。
Sub 文字の表示位置を設定()
Dim フォーム As Object
Set フォーム = UserForm1 '自分のフォームの名前に置き換えて下さい
フォーム.TextBox1.TextAlign = fmTextAlignCenter '文字を中央に揃える
End Sub
Dim フォーム As Object
Set フォーム = UserForm1 '自分のフォームの名前に置き換えて下さい
フォーム.TextBox1.TextAlign = fmTextAlignCenter '文字を中央に揃える
End Sub
上記のプログラムでは、フォーム内に配置されているTextBox1のTextAlignを fmTextAlignCenterに設定することで、テキストを中央に揃えることができます。
まとめ
テキストボックス内の文字の表示位置を設定するには、TextAlignを使用します。左寄せ、中央揃え、右寄せのいずれかを選んで設定することができます。簡単なコードを使って、フォーム上のテキストボックスの表示位置を変更することが可能です。
