掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
CSVファイルに空白行がある場合の、CSV読み込み処理をするには？ (ID:101366)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
現在VB6,WinXPで開発しています。 下記のようにしてCSVファイルを配列に入れているのですが、 CSVファイルに空白行があるとエラーになってしまいます。 どのように対処すればよいでしょうか？ Do Until EOF(FileNo) lngCount = lngCount + 1 ReDim Preserve strA(lngCount) As String ReDim Preserve strB(lngCount) As String ReDim Preserve strC(lngCount) As Integer Input #FileNo, strA(lngCount), strB(lngCount), strC(lngCount) Loop Close #FileNo ちなみにCSVファイルの形式は下記のように３列を縦に並べています。 見た目がエクセルのモードで管理しています。 A1、B1、C1 A2、B2、C2 A3、B3、C3 A4、B4、C4 下記のように３行目をなくすとエラーとなります。 A1、B1、C1 A2、B2、C2 A4、B4、C4 よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.