主题：查找

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

点击浏览该文件:病例.zip

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


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

1。 例子病名管理表窗口中查找时为什么只显示查找的内容,怎样把表的所有行依然显示,光标停留在查找内容上呢（图777中）？

2。开头字相同的内容查找时光标位置有偏差（图888中）

 

 查找和显示，分开成两个控件，不要合并在一起。

别用Fileter 用FInd   http://www.foxtable.com/help/topics/0552.htm

With e.Form
    If e.sender.text <> "疾病名称" Then
Dim txt As String = e.Form.Controls("combobox1").Text
If txt = "" Then
    Tables("病名管理").filter= ""
 Else
    txt = "'*" & txt & "*'"
    Tables("病名管理").filter = "疾病名称 Like " & txt
   End If
End If
End With

 

用find老出现错误,上面代码如何用find? 帮忙下!

 看2楼，你想做什么？

 

 查找和显示不要用同一个控件啊。

知道了,问题是执行查找命令是为什么只显示查找的行,其余行隐藏呢?

 

你查找的时候，用的是Like，也就是，只要满足条件的，就会显示出来，绝对查询，请用等于号

 

With e.Form
    If e.sender.text <> "疾病名称" Then
Dim txt As String = e.Form.Controls("combobox1").Text
If txt = "" Then
    Tables("病名管理").filter= ""
 Else
    txt = "'" & txt & "'"
    Tables("病名管理").filter = "疾病名称 = " & txt
   End If
End If
End With