主题：用Table控件模拟关联表

Dim t As Table = Tables("窗口1_Table1")
With Tables("产品")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "产品编号 = " & .Current("产品编号")
    End IF
End With

此代码中产品列是整数串,现在实际操作的项目中产品列是字符串的,包含了字母.

要如何把这个表达式的t.Filter = "产品编号 = " & .Current("产品编号")里面的" ' 做修改呢,改了半天都报错