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 |