将数据附加到CSV文件VB.NET中的每一行

时间:2014-08-14 20:13:47

标签: vb.net csv

我有一个带头的csv文件。我需要循环遍历csv中的所有行,并且每一行都在最后添加一个额外的列。我想不必阅读每一行,因为当它被重写时似乎改变了数据。我有一个带符号的奇怪字段,因此它无法正确读取。我知道这很容易,但我花了两天时间研究选项,但没有找到答案。我正处在一个巨大的时间紧迫的今天完成这个。有什么建议吗?

先谢谢

1 个答案:

答案 0 :(得分:0)

正如所建议的那样,如果您的数据以某种方式被破坏,那么它很可能是编码问题。你的问题的答案非常简单,例如

Dim filePath As String
Dim encoding As Encoding
Dim newColumnHeader As String

'...

Dim lines = File.ReadAllLines(filePath, encoding)

lines(0) &= "," & newColumnHeader

For lineNumber = 1 To lines.GetUpperBound(0)
    lines(lineNumber) &= "," & lineNumber
Next

File.WriteAllLines(filePath, lines, encoding)