锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net读写csv vbnet csv文件出力

IT技术文件

vb.net 怎么生成csv文件与怎么读取csv文件CSV文件vb.net读写csv ， 在EXCEL里可以直接生成与读取 。
可以通过VB.net去操作vb.net读写csv，打开EXCEL文件vb.net读写csv ， 去完成上述操作，而更为简单的办法是直接当做操作文本文件（TXT文件）就可以，因为用记事本软件，打开CSV文可以发现，其实际上是一个行内数据之间用逗号分隔的格式文件 。
下面给出例子：
在窗体上添加两个多行文本框 ， 两个按钮，两个文本框一个用来输入生成CSV文件的数据，另一个用来读取显示CSV文件的数据vb.net读写csv；两个按钮，一个完成生成CSV文件的代码，另一个完成读取CSV文件的代码；具体代码如下：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'创建(写入)一个文本文件
Dim MyStream As New System.IO.FileStream(Application.StartupPath"\Ssk.CSV", System.IO.FileMode.Create)
Dim MyWriter As New System.IO.StreamWriter(MyStream, System.Text.Encoding.Default)
MyWriter.WriteLine(TextBox1.Text)
MyWriter.Flush()
MyWriter.Close()
MyStream.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'读取一个文本文件
Dim MyReader As New System.IO.StreamReader(Application.StartupPath"\Ssk.CSV", System.Text.Encoding.UTF8)
TextBox2.Text = MyReader.ReadToEnd()
MyReader.Close()
End Sub
注意：在输入文本框里，同一行数据的数据之间用逗号（西文逗号）分隔 。
vb.net 操作CSV问题 求大神 急用一个streamreader和streamwriter即可
Using sr2 As New StreamWriter("2.csv", False, Text.Encoding.Default) '要写入的文件
Using sr1 As New StreamReader("1.csv", Text.Encoding.Default) '要读取的文件
While Not sr1.EndOfStream 'EndOfStream=True表示读取结束vb.net读写csv了
'读取
【vb.net读写csv vbnet csv文件出力】Dim lineread As String = "" '等下要读的行
Dim linewrite As String = "" '等下要写入的行
Dim data As String() '每个数据的数组
lineread = sr1.ReadLine '读一行并把流的位置往后调一行
'你现在可以用If判断这一行要不要删除 。如果要的话vb.net读写csv，用Else直接跳过下面的语句即可 。
data = https://www.04ip.com/post/lineread.Split(",".ToCharArray, StringSplitOptions.RemoveEmptyEntries) '读取一行，用逗号分隔后存在数组里
'下面对读取到的数据进行处理，你可以自己处理它
For Each item As String In data
linewrite = item"," 'csv是以逗号分隔的 ， vb.net读写csv我们写进去时也要记得加逗号
Next
'写入
If linewrite.EndsWith(",") Then '去掉行最后一个逗号 。
'如果之前读到一个空行 ， 这里就不会执行 。你想想为什么
sr2.WriteLine(linewrite.Remove(linewrite.Length - 1, 1))
End If
'如果你之前用If判断了行要不要删除，那么End If就应该加在这里 。
End While
sr1.Close()
End Using
sr2.Flush()
sr2.Close()
End Using
vb如何实时读取csv文件？给你一段VB.net读取csv文件的代码把 。
Imports System.IO
Imports System.Collections.Generic
Module Module1
Public CSV数据 As List(Of List(Of String))
''' summary
''' 从指定路径的文件读取内容vb.net读写csv，并分析出其中每行含有分隔符的数据vb.net读写csv，存到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
你上面的数据执行后vb.net读写csv，将会保存到一个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读写csv和vbnet csv文件出力的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：oracle查询用户被授予权限或角色，oracle授予用户所有权限

    下一篇：java避免重复代码，java如何阻止用户重复登陆