以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  Textbox的查询问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87564)

--  作者:douglas738888
--  发布时间:2016/7/13 17:32:00
--  Textbox的查询问题
老师,下面的代码有问题,不能实现,textbox填入编号后,自动能查询出编号下全部行

e.Form.Controls("TextBox1").Text = Tables("投标商务待审_Table3").Current("信息编号")

Dim filter1 As String = "1=2"
    For Each dc As Col In Tables("投标商务待审_Table4").Cols
    Filter1 &= " or Convert(" & dc.Name & ",\'System.String\') like \'%" & e.Form.Controls("TextBox1").Text & "%\'"
Next
    \'Tables("投标商务待审_Table4").Filter = Filter1

--  作者:douglas738888
--  发布时间:2016/7/13 17:52:00
--  
已解决,在ValueChanged里写上述代码   虽然已实现功能,另外,还请教老师,这样的代码写法是否正确  ,如果把TEXTBOX设置为不可见,该功能就不能实现。
[此贴子已经被作者于2016/7/13 18:07:09编辑过]