主题：[求助]无法在 System.String 和 System.Int64 上执行“=”操作

加上单引号

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

http://www.foxtable.com/webhelp/scr/1647.htm