运行时错误3001'参数类型错误或超出可接受的范围......'Visual Basic 6

时间:2017-03-16 12:54:35

标签: vb6

我有点问题。

我想在Visual Basic 6中过滤DataGrid。我正在使用此代码

  

Adodc1.Recordset.Filter = "columnname like '%" + Me.Txtsearch.Text + "%'"

一切顺利。当我在文本框中输入单词“a”时,将出现字母“a”的数据。但是当从文本框中删除该字母时,会出现类似这样的错误

  

运行时错误3001'参数类型错误或超出可接受的范围,或者彼此冲突'

以下是错误的屏幕截图:

Error message

有人可以向我解释为什么会这样吗?

1 个答案:

答案 0 :(得分:4)

发生错误是因为您没有将任何参数传递给过滤器。 尝试按如下方式进行:

if trim(Me.Txtsearch.Text) <> "" then
    Adodc1.Recordset.Filter = "columnname like '%" + Me.Txtsearch.Text + "%'"
else
    Adodc1.Recordset.Filter = ""
end