以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  在窗口中通过文本框查找行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=71863)

--  作者:bestorange
--  发布时间:2015/7/19 17:24:00
--  在窗口中通过文本框查找行


图片点击可在新窗口打开查看此主题相关图片如下:544444.png
图片点击可在新窗口打开查看
窗口中已绑定表"学员一览表"

添加了文本框和按钮

在文本框中输入某一列 信息  单击按钮 在绑定表中 选中该行

 

帮助里教了如何在菜单里设置搜索栏,在窗口中该如何实现呢?


--  作者:大红袍
--  发布时间:2015/7/19 17:27:00
--  

 一样的意思 http://www.foxtable.com/help/topics/1058.htm

 


--  作者:bestorange
--  发布时间:2015/7/19 17:54:00
--  

我查找按钮 命令:

Dim Filter   As   String
 With e.Form.Controls("按学员姓名")
       If .Value   IsNot   Nothing  Then
         Filter =   "姓名 = \'" & .Value &   "\'"
       End   If
 End   With

 

如果不指定列  而是根据关键字呢?可以实现吗?


--  作者:大红袍
--  发布时间:2015/7/19 18:04:00
--  

Dim filter As String = "1=2"
For Each dc As Col In Tables("表A").Cols
    Filter &= " or Convert(" & dc.Name & ",\'System.String\') like \'%" & e.Form.Controls("按学员姓名").Text & "%\'"
Next

msgbox(filter)


--  作者:bestorange
--  发布时间:2015/7/19 18:10:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:444433.jpg
图片点击可在新窗口打开查看
单击以后 弹出这个窗口
--  作者:bestorange
--  发布时间:2015/7/19 18:12:00
--  

窗口事件

Dim cmb As WinForm.ComboBox = e.form.Controls("输入关键字")
cmb.ComboList = DataTables("学员一览表")

要这样吗?

 


--  作者:大红袍
--  发布时间:2015/7/19 18:31:00
--  

 你要实现怎样的一种查询?选择一个列,然后输入关键字查询?

 

 简单做个例子发上来。


--  作者:bestorange
--  发布时间:2015/7/19 18:36:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:0009.png
图片点击可在新窗口打开查看


输入关键字 查询绑定表中 包含关键字的行。


--  作者:bestorange
--  发布时间:2015/7/19 18:37:00
--  
不用筛选,就选定指定行就行,or 选定行 突出显示
[此贴子已经被作者于2015/7/19 18:38:08编辑过]

--  作者:bestorange
--  发布时间:2015/7/19 19:46:00
--  
还在吗?