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

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:日常维护记录.table

在维修录入窗口，新增记录后，比如录入报修科室时，能实现下拉窗口的筛选，报修人同理。

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

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

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

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

我在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

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()

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

我在该事件下写了代码，也能检索，就是回车离开该列后，显示为空白。