| |
はじめまして
今VB.netでcsvファイルの読み込みをしているのですが
ファイルが存在しない場合の処理がわかりません
教えていただけないでしょうか
現在のソースは
Dim objFile As New System.IO.StreamReader("C:\a.csv" _
, System.Text.Encoding.GetEncoding(932))
Dim strLine As String '１行
Dim strTemp() As String '戻り配列
Dim intCnt As Integer '配列添え字
Dim strData As String 'データ
'次の行へ
strLine = objFile.ReadLine()
While (strLine <> "")
'行単位データをカンマ部分で分割し、配列へ格納
strTemp = Split(strLine, ",")
For intCnt = 0 To UBound(strTemp)
'テスト的に、列番号を印字
strData = strData + "★" + CStr(intCnt) + "列目"
'列データ strTemp(intCnt) を取得
strData = strData + strTemp(intCnt)
Next
'テスト的に、行の終わりを印字
strData = strData + "■行終"
'次の行へ
strLine = objFile.ReadLine()
End While
'デバッグでテキストフィールドへ書きだします。
TextBox1.Text = strData
'ファイルのクローズ
objFile.Close()
となっています
|
|
