主题：新版问题

从这个问题可以看出，DataList是一个误人子弟的东西，早就应该删除的。


with e.Form
    if e.sender.text <> "请输入关键字" then
        Dim dst As WinForm.DataList = .Controls("DataList2")
        Dim txb1 As WinForm.TextBox = .Controls("TextBox1")
        Tables("窗口中的Table").Filter = "[IO] Like '*" & txb1.text & "*' or [GO NO] Like '*" & txb1.text & "*'or [客户合同号] Like '*" & txb1.text & "*'or [英文款号] Like '*" & txb1.text & "*'or [商标] Like '*" & txb1.text & "*'or [客户名称] Like '*" & txb1.text & "*'or [款号] Like '*" & txb1.text & "*'or [布款号] Like '*" & txb1.text & "*'or [季节号] Like '*" & txb1.text & "*'or [CAPS] Like '*" & txb1.text & "*'"
      
      
    end if
end with

我打开CaseStudy目录下的例子，没有这个问题啊