項目

改行とタブの指定

例

Option Compare Database
Option Explicit

'-------------------------------------------------
' 改行とタブの指定
'-------------------------------------------------
Sub 改行とタブ()

    Dim buf As String
   
    '１．改行(定数指定)
    buf = "hello" & vbCrLf & "Accessむかむか"
         
    Debug.Print "１．"; buf

   '２．改行(文字コード指定)

    buf = "hello" & Chr(13) & Chr(10) & "Accessむかむか"

    Debug.Print "２．"; buf
   
    '３．タブ（定数指定）
    buf = "hello" & vbTab & "Accessむかむか"
   
    Debug.Print "３．"; buf
   
   '４．タブ（文字コード指定）
    buf = "hello" & Chr(9) & "Accessむかむか"
   
    Debug.Print "４．"; buf
    
End Sub