vb.net - CSV 中的换行符

Question

我必须将什么字符或字符组合插入到我的 csv 文件中，以便如果我在 Excel 中启用换行符，此时文本会正确中断？

Private Sub removeHTMLTags(ByRef text As String)
    Dim htmlTagRegex As New Regex("<[^>]*>")
    Dim lineBreakHTMLTagRegex As New Regex("(<p>)|(<br>)|(</br>)|(</p>)")
    text = lineBreakHTMLTagRegex.Replace(text, Chr(10))
    text = htmlTagRegex.Replace(text, " ")
    text = text.Trim
End Sub

而不是 Chr(10) 我也尝试了 vbNewLine, vbCrLf, vbCr 但每次都得到相同的结果:当 Excel 打开文件时，这些符号被解释为正常的换行符，这会导致 excel 中的行拆分
这就是它的样子:

这是它的样子:

如果我想简单地通过双击加载 csv 文件，而不是在导入对话框中加载，我需要如何实现第二个屏幕截图中的样式
备注:这不是 VBA，我需要通过在创建 csv 文件后打开 Excel 的外部 vb.net 控制台应用程序来执行此操作。

Answer 1

如果要包含 CR和 LF控制字符，那么您需要将字段用双引号引起来。

如果你这样做，我建议你应该在每个字段周围加上双引号以保持一致性。

所以你的方法看起来像这样:

Private Sub removeHTMLTags(ByRef text As String)
    Dim htmlTagRegex As New Regex("<[^>]*>")
    Dim lineBreakHTMLTagRegex As New Regex("(<p>)|(<br>)|(</br>)|(</p>)")
    text = lineBreakHTMLTagRegex.Replace(text, Chr(10))
    text = htmlTagRegex.Replace(text, " ")
    text = "" & text.Trim & ""
End Sub

更多详情可在这找到:
http://www.creativyst.com/Doc/Articles/CSV/CSV01.htm