讀取csv文件保存到數組 vb.net代碼

csv文件可以當做文本文件來處理！

汕城ssl適用于網站、小程序/APP、API接口等需要進行數據傳輸應用場景，ssl證書未來市場廣闊！成為創(chuàng)新互聯的ssl證書銷售渠道，可以享受市場價格4-6折優(yōu)惠！如果有意向歡迎電話聯系或者加微信：18980820575（備注：SSL證書合作）期待與您的合作！

主要處理代碼如下：

Dim t As String, b() As stirng, s(10) As String, cj(10) As Single

t = "" '這里是你讀取的CSV文件內容

b() = Split(t, vbCrLf)

For j = 0 To 9

s(j) = b(j) '這個就是每一行的數據了

c() = Split(s(j), ",")

cj(j) = Val(c(1)) '這個就是每一行的成績數據了

Next

'然后進行排序和顯示處理

vb如何實時讀取csv文件？

給你一段VB.net讀取csv文件的代碼把。

Imports?System.IO

Imports?System.Collections.Generic

Module?Module1

Public?CSV數據?As?List(Of?List(Of?String))

'''?summary

'''?從指定路徑的文件讀取內容，并分析出其中每行含有分隔符的數據，存到CSV數據中。

'''?para調用的時候使用CSV數據(5)(0)表示第6條記錄的第1個數據/para

'''?/summary

'''?param?name="文件路徑"必需。一個[String]表達式。要讀取的文件路徑。/param

'''?returns返回是否讀取成功/returns

'''?remarks/remarks

Public?Function?讀取(ByVal?文件路徑?As?String)?As?Boolean

Dim?文件讀取器?As?StreamReader?=?New?StreamReader(文件路徑)

Dim?語句?As?String

Dim?t成功?As?Boolean?=?True

Dim?分隔符?As?Char?=?";"

CSV數據?=?New?List(Of?List(Of?String))

While?Not?文件讀取器.EndOfStream

Try

語句?=?文件讀取器.ReadLine

'分析語句后判斷類型

If?語句.Contains(分隔符)?Then

Dim?array?=?語句.Split(分隔符)

If?array?IsNot?Nothing?Then

CSV數據.Add(array.ToList())

End?If

End?If

Catch?ex?As?Exception

t成功?=?False

End?Try

End?While

Return?t成功

End?Function

End?Module

你上面的數據執(zhí)行后，將會保存到一個List嵌套List的String組中。

自己轉化為數字再進行操作把。

Dim?數字?=?Convert.ToDecimal(CSV數據(5)(0))

關于VB.NET的CSV文件的讀取

你是怎么讀寫的呢？下面是簡單的讀寫

Dim str As String = (My.Computer.FileSystem.ReadAllText("C:\QD51-R24_A.csv")) '讀

My.Computer.FileSystem.WriteAllText("C:\1.csv", str, True) '寫

vb.net讀取.cvs文件，如何判斷讀取到了最后一行？

你csv文件是用什么分割符的？

把csv文件當做文本文件處理

File.ReadAllLines 讀取所有行，

然后循環(huán)每行，按照分隔符split后就是每一列

文章名稱：vbnet讀取csv VBNET讀取SELECT某一列的值
URL標題：http://jinyejixie.com/article20/ddojpco.html

成都網站建設公司_創(chuàng)新互聯，為您提供企業(yè)網站制作、動態(tài)網站、網站營銷、網站建設、關鍵詞優(yōu)化、品牌網站制作

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯