请教怎样将英文单引号替换成双引号？

roych

少一个双引号

1. Sub test()
   
2.     Dim str As String
   
3.     str = "'Roych'"
   
4. 
   
5.     Debug.Print str
   
6. '返回：'Roych'
   
7.     str = Replace(str, "'", """")
   
8.     Debug.Print str
   
9. '返回："Roych"
   
10. End Sub
    

复制代码

roych

wang1950317 发表于 2016-6-8 12:20
弄不懂为什么要用四个引号才能变成一个“

双引号只能成对出现。
因此三个双引号时候，就会把前面两个双引号视为一对；最后一个双引号没有成对出现，就会出错。
--------------------
而更深层次的解释是，
双引号在Access里属于转义字符，即代表字符串的外围标签。
在一对双引号的里面如果还需要使用双引号的话，就必须使用转义字符了，这四个双引号的解释如下：
"（左侧外围标签）"（转义字符）"（实际字符）"（右侧外围标签）