VB.net排序csv vbs excel排序

vb.net 怎么生成csv文件与怎么读取csv文件CSV文件,在EXCEL里可以直接生成与读取 。
可以通过VB.net去操作,打开EXCEL文件,去完成上述操作 , 而更为简单的办法是直接当做操作文本文件(TXT文件)就可以 , 因为用记事本软件,打开CSV文可以发现,其实际上是一个行内数据之间用逗号分隔的格式文件 。
下面给出例子:
在窗体上添加两个多行文本框,两个按钮,两个文本框一个用来输入生成CSV文件的数据,另一个用来读取显示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
注意:在输入文本框里,同一行数据的数据之间用逗号(西文逗号)分隔 。
读取csv文件保存到数组 vb.net代码csv文件可以当做文本文件来处理!
主要处理代码如下:
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.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表示读取结束了
'读取
Dim lineread As String = "" '等下要读的行
Dim linewrite As String = "" '等下要写入的行
Dim data As String() '每个数据的数组
lineread = sr1.ReadLine '读一行并把流的位置往后调一行
'你现在可以用If判断这一行要不要删除 。如果要的话,用Else直接跳过下面的语句即可 。
data = https://www.04ip.com/post/lineread.Split(",".ToCharArray, StringSplitOptions.RemoveEmptyEntries) '读取一行,用逗号分隔后存在数组里
'下面对读取到的数据进行处理,你可以自己处理它
For Each item As String In data
linewrite = item"," '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.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 如何对数据库查询结果记录集排序?加了单引号就是一个常量字符串了,对于每一行都是一样的
像这种放在最前面的字段,order by 1 就可以了
VB.NET 读取CSV文件到datatable中后 , 数据被重新排序了,请大神帮忙看看哪里有问题首先 , 在填充后的datatable处设置一个断点,查看datatable中的数据是什么样的 , 判断是读取出了问题还是绑定到datagridview时候出的问题 。然后补充问题告诉我datatable中的数据是什么样的
【VB.net排序csv vbs excel排序】关于VB.net排序csv和vbs excel排序的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

    推荐阅读