vb.net 操作CSV问题 求大神 急

发布网友 发布时间：2023-09-26 18:37

我来回答

共2个回答

热心网友 时间：2024-12-13 00:35

用一个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 = 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

热心网友 时间：2024-12-13 00:35

好像只能先读出来，修改后保存。。。。。追问那可以对读到的这行进行删除操作吗？

追答当然可以啊，
比如 里面有数据
1行：123
2行：234
先读取出来，如 data(1)="123",,data(2)="234"
删除123，就是保存去掉data（2）就OK。