主题：如何快速的从列表中检索出数据

能否说清楚一点 怎么个筛选根据什么筛选什么.

打开维修录入窗口后，录入完日期，在录报修科室时，我希望通过拼音码检索出报修科室，因为科室比较多，一个一个找太麻烦

参考这里做吧,你这个需求 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=24819

这个不是我想要的功能，我是在录入窗口来实现检索，您所提供的指示实现了检索的功能。

我是让你参考他的拼音模糊搜索啦. 你不是要求通过拼音码检索出报修科室

那在绑定表里也没有可以实现的事件呀，我怎么写呢？

你使用下拉窗口,然后设置下拉窗口表的Filter 就行.

我现在，所有的事件代码都写完了，但运行程序后，录入的内容也进行了筛选，就是回车后，下拉类表框的内容为空，不知道为何？

我在DropDownClosed事件也是如下写的

If e.Selected Then '如果选择了值
    Dim tbl As Table = Tables("bxks_Table1")
    If tbl.Current IsNot Nothing Then
        e.Form.DropDownBox.Value = tbl.Current("部门名称")
    End If
End If

DropDownOpened 这里呢？

Dim txt As String = e.Form.DropDownBox.Text
Dim tbl As Table = Tables("bxks_Table1")
If txt = "" Then
    tbl.Filter = ""
   Else
   ' txt = '*" & txt & "*'
    tbl.Filter ="拼音码 Like '*" & txt & "*'"
  End If
e.Form.DropDownBox.Select()

我是通过拼音码，检索出科室信息，然后再下拉框关闭后显示科室名称。