CSVファイルの内容を読み込む方法

◆概要

このページは、Visual Basic 6.0でCSVファイルの内容を読み込む方法について記載しています。


Open ステートメントでCSVファイルを開き、Input# ステートメントを使うことで、CSVファイルの内容を読み込むことができます。

◆Sample code

次の例は、Input# ステートメントを使ってCSVファイルを変数に保存し、変数の内容ををイミディエイトウィンドウに表示します。


次の例を実行する前に、Visual Basic 6.0のメニュー[表示]-[イミディエイトウィンドウ](ショートカットCtrl+G)でイミディエイトウィンドウを表示させておいてください。

Private Sub Command1_Click()
    Dim strFileName As String
    Dim intFileNo As Integer
    Dim strRecBuff As String

    '読み込むCSVファイル名
    strFileName = "C:\test.csv"
    
    '空いているファイル番号を取得
    intFileNo = FreeFile
    
    'ファイルを開く
    Open strFileName For Input As intFileNo

    'ファイルの最後に達するまでループ
     Do Until EOF(intFileNo)
        'ファイルから読み込んだ内容を変数に保存
        Input #intFileNo, strRecBuff
        '変数の内容をイミディエイトウィンドウに表示
        Debug.Print strRecBuff
    Loop

    'ファイルを閉じる
    Close intFileNo

End Sub
  

▼ページトップへ