访问VBA名称中的单引号会导致语法错误

我有一个带有供应商名称列表的表格，当我点击带有以下代码的按钮时

Private Sub CmdView_Click()
On Error GoTo Err_CmdView_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "FrmSuppliers"

    stLinkCriteria = "[SupplierName]=" & "'" & Me![SupplierName] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_CmdView_Click:
    Exit Sub

Err_CmdView_Click:
    MsgBox Err.Description
    Resume Exit_CmdView_Click

End Sub

将打开一个包含其信息的表单，但是，我有一个供应商的名称中有一个撇号，例如O'Tooles，当我为他们单击按钮时，我会得到错误

Syntax error (missing operator) in query expression
'[SupplierName]='O'Tooles''.

---

是否有办法将代码更改为撇号？

如果您试图使用单引号作为字符串分隔符，请改用双引号（只需使用额外的

“

对其进行转义即可）：

---

试着用chr（39）代替撇号。@SivaprasathV我不明白这是怎么回事。chr（39）是撇号的字符常量

stLinkCriteria = "[SupplierName]=" & """" & Me![SupplierName] & """"