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を使ってループしながら配列の項目を処理していく方法です。
No.1
- 回答日時:
可能ですが、どういう読込処理作ったのかな?
「LineInputしてSplitで列分割」をdoかwhileのループで廻すでしょ?
LineInputを1回実行して何もせずに次のLineInputからループさせる。
この回答への補足
回答ありがとうございます!
説明不足ですみません,私は
ReadLineというもので読み取ってからSplitし,
Do Until IsNothing(line)
~
Loop
という風にしています.LineInputの使い方がわからないのですが,ReadLineでやる方法と同じなのでしょうか?
よろしくお願いします.
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
この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
VB.NETで他のプロジェクトで作成したフォームを使う方法
Visual Basic(VBA)
-
6
VB.net 重複チェックがしたいです
Visual Basic(VBA)
-
7
VB.net
Visual Basic(VBA)
-
8
Redim とEraseの違いは?
Access(アクセス)
-
9
1行ごとに取得して、その改行文字が何か知る方法
Visual Basic(VBA)
-
10
Designer.vbは直接コードをいじってはだめ?
Visual Basic(VBA)
-
11
<VB.NET>INSERT文でDBにデータを入れたい
Visual Basic(VBA)
-
12
VB.NETで小数点以下の桁数を取得したい
その他(ソフトウェア)
-
13
フォームの再読み込み
Visual Basic(VBA)
-
14
CSVファイルから文字列を読み込む
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
UWSCの終了の仕方
-
UWSCに制限時間を付けたいです
-
ループフリー
-
DoEventsが必要な理由について
-
DOSコマンドのループ内のTIMEコ...
-
エクセル関数で1〜12の数字がル...
-
WHILE (CHKIMG(”A.bmp”)=FALSE)...
-
CSVファイルの特定の行だけを読...
-
VBA Dir関数でファイルをループ...
-
一巡伝達関数と開ループ伝達関数
-
pythonでファイルのコメント行...
-
VBA 変数を使うべき?
-
VBA for i=1 to lastrow
-
Escキーを押すと、中断する時と...
-
範囲指定したセルを1つずつ飛...
-
VBA横データを縦にしたいです
-
c++ ランダムウォーク
-
vb.netからエクセル関数書き込み
-
ループ内での条件処理
-
多重ループの抜けだし方
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
画面を強制的に再描画させる方法
-
VBAでの一時停止と再開の方法
-
UWSCの終了の仕方
-
DoEventsが必要な理由について
-
範囲指定したセルを1つずつ飛...
-
Escキーを押すと、中断する時と...
-
DOSコマンドのループ内のTIMEコ...
-
GIFアニメをループさせたくない
-
VBAで3秒だけ時間を止めたい
-
乱数の桁数指定、または範囲指定。
-
アクティブセルから、A列最終行...
-
VBA for i=1 to lastrow
-
テキストボックスの名前に変数...
-
vbscriptでIE自動入力(途中で...
-
エクセル関数で1〜12の数字がル...
-
エクセルの当番表を作っていま...
-
Do whileでExitせず、ループの...
-
VBA Dir関数でファイルをループ...
-
vb.netからエクセル関数書き込み
-
ループフリー
おすすめ情報