改行・タブの定数
これらの定数は、使用前に定義する必要はありません。コード中のどこでも、対応する値の代わりに使用することができます。
| 定数 | 値 | 内容 |
| vbCr | Chr(13) | 改行（キャリッジリターン文字） |
| vbLf | Chr(10) | 改行（ラインフィード文字） |
| VbCrLf | Chr(13)+Chr(10) | 改行（キャリッジリターンとラインフィードの組み合わせ） |
| vbNewLine | Chr(13)+Chr(10) または Chr(10) | 改行（プラットフォームで指定した改行文字） |
| vbTab | Chr(9) | タブ文字（横） |
改行・タブの定数 を使った例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
Sub Sample_Const() Dim str As String 'Chr(13) キャリッジリターン文字。 str = "キャリッジリターン文字" & vbCr 'Chr(10) ラインフィード文字。 str = str & "ラインフィード文字" & vbLf 'Chr(13)+Chr(10) キャリッジリターンとラインフィードの組み合わせ。 str = str & "キャリッジリターンとラインフィード" & vbCrLf 'Chr(13)+Chr(10) または Chr(10) プラットフォームで指定した改行文字。 str = str & "プラットフォームで指定した改行文字" & vbNewLine 'Chr(9) タブ文字 (横)。 str = str & "これが" & vbTab & "タブ文字 (横)です。" & vbNewLine MsgBox str End Sub |
実行結果
