![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんばんは
.NET VBでCSVファイルの処理をする場合はReadLineとSplitはコンビで使用することが多いです。
Do Untilは基本的なループですので、今回はReadLineとSplit、Do Untilでサンプルを作成しました。
>一行目を飛ばし
line = reader.ReadLine
を一行いれて何もしなければ、やり過ごせます(一行とばし)
サンプルのcsvファイルの内容は
一行目,100
二行目,200
三行目,300
四行目,400
五行目,500
にしてます。
Public Class Form1
Private Sub f() Handles MyClass.Shown
Dim reader As New IO.StreamReader("C:\test\test.txt", System.Text.Encoding.GetEncoding("shift-jis"))
Dim line As String 'ファイルの一行
Dim itm() As String '行の項目の配列
line = reader.ReadLine '一行読んで何もしない
line = reader.ReadLine '次の一行を読む
Do Until IsNothing(line) 'lineがなくなるまでループ
itm = line.Split(",") 'カンマで区切る
'ListBoxに表示
ListBox1.Items.Add(itm(0) & "は" & itm(1))
line = reader.ReadLine '次の一行を読む
Loop
reader.Close()
End Sub
End Class
ReadAllLinesを使うと配列になりますので簡単ですが、基本はReadLineを使ってループしながら配列の項目を処理していく方法です。
![「VB2010でCSVファイルの読み込み」の回答画像2](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/9/1466276_5497eed9034eb/M.jpg)
No.1
- 回答日時:
可能ですが、どういう読込処理作ったのかな?
「LineInputしてSplitで列分割」をdoかwhileのループで廻すでしょ?
LineInputを1回実行して何もせずに次のLineInputからループさせる。
この回答への補足
回答ありがとうございます!
説明不足ですみません,私は
ReadLineというもので読み取ってからSplitし,
Do Until IsNothing(line)
~
Loop
という風にしています.LineInputの使い方がわからないのですが,ReadLineでやる方法と同じなのでしょうか?
よろしくお願いします.
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- XML PHP.laravelについて 1 2023/07/06 15:26
- Access(アクセス) CSVファイルの「0落ち」にVBA 6 2023/02/02 15:27
- その他(プログラミング・Web制作) Pythonで、データファイルと列名ファイルを1つのファイルにしたいです。 1 2023/07/27 20:29
- C言語・C++・C# このプログラミング誰か教えてくれませんか 3 2022/05/13 17:27
- Excel(エクセル) csvファイルをExcel形式で読み込むには 2 2023/07/03 13:09
- Perl Perlで特定文字列から特定文字列までを抜き出したい 4 2022/04/02 14:24
- Excel(エクセル) CSVファイルがカンマ区切りにならない。対処法を教えていただきたいです。 仕事でSMS一斉送信ができ 2 2022/07/01 21:24
- その他(プログラミング・Web制作) Windowsのバッチファイルについてご教示ください 5 2023/07/25 20:23
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
CSVから指定行だけを読み込み
Visual Basic(VBA)
-
CloseとDisposeの違い
Visual Basic(VBA)
-
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
-
4
csvファイルのデータの一部を取り出したい
Visual Basic(VBA)
-
5
Redim とEraseの違いは?
Access(アクセス)
-
6
<VB.NET>INSERT文でDBにデータを入れたい
Visual Basic(VBA)
-
7
VB.net
Visual Basic(VBA)
-
8
CSVファイルの特定行の削除
Visual Basic(VBA)
-
9
小数点を含む数値かどうか判断の判断方法
Visual Basic(VBA)
-
10
csvファイル 項目数取得
Visual Basic(VBA)
-
11
フルパスから最後のディレクトリ名を取得したい。
Visual Basic(VBA)
-
12
文字列の後ろから必要分だけ削除したい。
Visual Basic(VBA)
-
13
1行ごとに取得して、その改行文字が何か知る方法
Visual Basic(VBA)
-
14
DataGridViewで指定したセルの値を取得
Visual Basic(VBA)
-
15
Designer.vbは直接コードをいじってはだめ?
Visual Basic(VBA)
-
16
VB.net 重複チェックがしたいです
Visual Basic(VBA)
-
17
CSVファイルから文字列を読み込む
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
UWSCの終了の仕方
-
CSVファイルの特定の行だけを読...
-
画面を強制的に再描画させる方法
-
VBA for i=1 to lastrow
-
null 参照の例外が実行時に発生...
-
UWSCのスクリプトで行き詰って...
-
DOSコマンドのループ内のTIMEコ...
-
ガレージバンド のサンプリング...
-
無限ループの防ぐ方法
-
ループフリー
-
javaのループ処理の結果を足し...
-
VBAで3秒だけ時間を止めたい
-
プログラミングについて。 1つ...
-
Do whileでExitせず、ループの...
-
CASLIIの問題で困っています
-
アルゴリズム:2分探索の時間計算量
-
エクセル関数で1〜12の数字がル...
-
範囲指定したセルを1つずつ飛...
-
VBA Dir関数でファイルをループ...
-
Escキーを押すと、中断する時と...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
プログラミングについて。 1つ...
-
画面を強制的に再描画させる方法
-
どなたかこのプログラミングを...
-
VBAでの一時停止と再開の方法
-
VBA for i=1 to lastrow
-
UWSCの終了の仕方
-
DoEventsが必要な理由について
-
エクセルの当番表を作っていま...
-
VBAで3秒だけ時間を止めたい
-
GIFアニメをループさせたくない
-
Escキーを押すと、中断する時と...
-
DOSコマンドのループ内のTIMEコ...
-
CSVファイルの特定の行だけを読...
-
アクティブセルから、A列最終行...
-
vb.netからエクセル関数書き込み
-
範囲指定したセルを1つずつ飛...
-
テキストボックスの名前に変数...
-
乱数の桁数指定、または範囲指定。
-
「偶数・奇数の和」のフローチ...
-
vbscriptでIE自動入力(途中で...
おすすめ情報