查询功能

学习　发表于：2010-07-16 16:59:43 　

复制

我做了个中药数据库，想实现即时查询功能，就像股票软件那样的。

首先在输入框中输入“c”，输入框中就会列出所有以“c”开头的药物名单。
然后再输入“s”，上述名单中剩下开头两个字母以“cs”组合的药物。（赤芍、蟾酥、磁石、赤石脂）
最后再选中想查的药物，查询药物的具体内容。

最后的功能我会做，头两步的功能没做过，所以想请各位高手指点。多谢了！

Top

王樵民发表于：2010-07-16 17:08:45

将输入框改成组合框，设置组合框的行来源 select 药物名 from 药物表 GROUP BY 药物名 HAVING 药物名 Is Not Null;

行来源类型设置成“表/查询”，这样就能满足你的要求。

上述假设你的表名称为“药物表”，该表中有一个字段的名称为“药物名”

Top

放弃发表于：2010-07-17 12:32:19

Private Sub 输入框名_KeyUp(KeyCode As Integer, Shift As Integer)
If IsNull(Me.输入框名.Text) = True Then
Me.子窗体名.Form.FilterOn = False
Else
Me.子窗体名.Form.Filter = "[药物名] LIKE '*" & Me.输入框名.Text & "*'"
Me.子窗体名.Form.FilterOn = True
End If
End Sub

Top

学习发表于：2010-07-19 14:49:23

多谢各位，我正在按各位所说的办法做呢，多谢了！

Top

符鸿敏发表于：2010-07-24 19:44:15

http://www.accessoft.com/bbs/index.asp 类似googl主页效果的简拼查省份示例的再改进

或许对你有帮助。

Top

学习发表于：2010-07-27 11:05:26

不好意思，好久不用，有些方法有些生疏了，一直没弄明白。再次恳请各位帮忙，完成我所说的查询功能。特将数据上传！