主题：提示缺少操作数

Dim txtkey As WinForm.TextBox = e.Form.Controls("txtkey")
Dim str As String =txtkey.Text
With CurrentTable
'Dim cname As String=.Cols(.ColSel).Name
Dim str1 As String = "& cname &   = '"& str & "' "

    .Filter =  str1
End With