VB.NET：需要正则表达式将返回字符替换为另一个字符串

Question

我试图将从 Windows 窗体中的多行文本框中获取的字符串中的所有回车符替换为字符串 ",
" ，以便当我在一些 HTML 它可以正确显示。

Function Blah(ByVal strInput As String) As String
  Dim rexCR As Object
  rexCR = CreateObject("VBScript.RegExp")
  rexCR.Pattern = "\r"
  rexCR.Global = True
  Blah = rexCR.Replace(strInput, ",<BR>")
End Function

尝试搜索以下任何字符，但仍然没有成功：
\r|\n|\r\c|\cM|\x0d

问题似乎是函数/表达式没有检测到文本中的任何回车符，我不知道为什么？ 我知道该函数可以工作，因为我可以在其中放置不同的表达式作为测试，并且没问题

有什么想法吗？

Answer 1

没有正则表达式的普通 strInput.Replace(vbCrLf,",
") 怎么样？

Answer 2

其他人已经为您的问题提供了很好的解决方案。作为一般性说明，我想解释一下，VB.NET 没有像 C# 那样的字符串转义序列（\n、\r、\t、...）。 VB.NET 中的字符串文字 类似于 C# 中的逐字字符串 -- 唯一可以转义的字符是双引号（加倍）。

相反，您必须使用 VB 常量（例如 vbCrLf、vbTab）或 .net 常量（例如 Environment.NewLine）和字符串连接（ “Hello World”和 vbCrLf 而不是“Hello World\n”）。

Answer 3

怎么样：

Function Blah(ByVal strInput As String) As String
  return strInput.Replace(Environment.NewLine, "<br />")
End Function