主题：在窗口中通过文本框查找行

此主题相关图片如下：544444.png

窗口中已绑定表"学员一览表"

添加了文本框和按钮

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

 

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

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

 

我查找按钮 命令：

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

 

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

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)

此主题相关图片如下：444433.jpg

单击以后 弹出这个窗口

窗口事件

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

要这样吗？

 

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

 

 简单做个例子发上来。

此主题相关图片如下：0009.png

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

不用筛选，就选定指定行就行，or 选定行 突出显示

还在吗？