在VB中的字符串中使用左双引号

Question

在下面的代码中，使用字符串 "“"（即字符串内的左双引号）会导致 VB.NET 中出现编译错误：

StringVar = Replace(StringVar, "“", "“")

这是怎么回事？

Answer 1

似乎您想用等效的 HTML 代码替换大引号。

乍一看，您的代码绝对正确。问题是 VB 允许在代码中用大引号代替常规引号（因为 Unicode 很棒，对吧？）。也就是说，以下代码都是等效的：

Dim str = "hello"
Dim str = “hello”
Dim str = "hello“

现在，如果您想在字符串内使用引号，VB 不知道引号是否应该结束字符串。在 C# 中，可以通过转义引号来解决这个问题，即用 "\"" 代替 """。在 VB 中，通过双引号完成相同的操作，即 """"。

回到你的弯引号。根据 VB 语言规范 (¶1.6.4)，与直引号相同。因此，要在代码中编写弯引号，请尝试以下操作：

StringVar = Replace(StringVar, "““", "“")

不幸的是，我现在无法尝试此代码，IDE 完全有可能只是将其替换为直引号。如果是这种情况，另一种方法是使用 Chr 或 ChrW 以及“左双引号”的字符代码：

StringVar = Replace(StringVar, ChrW(&H201C), "“")

或者，为了对称，写为十进制（但我更喜欢十六进制字符代码）：

StringVar = Replace(StringVar, ChrW(8220), "“")

其他：Replace 函数可能很快就会被弃用，并且 并非在任何地方都有效（例如 Windows Phone 7）。相反，请使用 String 类的 Replace 方法：

StringVar = StringVar.Replace(, ChrW(8220), "“")

Answer 2

请参阅 http://msdn.microsoft.com/ en-us/library/613dxh46%28v=vs.71%29.aspx

试试这个：
StringVar = Replace(StringVar, "“", ChrW(&H8220))

Answer 3

看起来您正在搜索ChrW 函数，用于将 Unicode 字符代码转换为实际字符。< /strong>

如果您尝试用弯引号替换字符串中的直引号，请尝试以下代码：

'Declare a string that uses straight quotes
Dim origString As String = "This string uses ""quotes"" around a word."

'Create a new string by replacing the straight quotes from the original string
'with left-facing curly quotes
Dim newString As String = origString.Replace("""", ChrW(8220))

'Display the result
MessageBox.Show(newString)

或者，如果您尝试将字符串中向左的弯引号替换为替代符号 (假设您在问题中使用的代码是正确的），请尝试以下代码：

'Declare a string that uses left-facing curly quotes
Dim origString As String = "This string uses fancy " & ChrW(8220) & _
                           "quotes" & ChrW(8220) & " around a word."

'Create a new string by replacing the curly quotes with an arbitrary string
Dim newString As String = origString.Replace(ChrW(8220), "“")

'Display the result
MessageBox.Show(newString)