掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
CSVファイルを行単位で読み込むには? (ID:123834)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
改行コードがLFのみで全件読み込んでくるなら Dim filepath As String 'ファイのパス Dim AllLine As String 'ファイル内全データ Dim Line As String '一行分のデータ filepath = "test.csv" 'ファイルを開く Open filepath For Input As #1 '一行(この場合は全部)読み込む Line Input #1, AllLine Close #1 '読み込んだデータ(AllLine)を vbLf で切って 'Line 変数に格納する(Lineは配列になる) Line = Split(AllLine, vbLf) '配列があるだけぐるぐる回して出力 For i = 0 to Uboud(Line) - 1 Debug.Print line Next VB6.0ならこのままでいけるかな。。。テストしてないです。 .NETなら最初の宣言を Dim Line() As String にしないとだめかも
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.