Office中国论坛/Access中国论坛

标题: 任意字段组合查询怎么实现？ [打印本页]

作者: 龙卷风 时间: 2002-11-27 23:01
标题: 任意字段组合查询怎么实现？
我想实现一个面板操纵形式：就是在表和查询及关系都已完成的情况下，设计一个窗体，上面带有各个字段按钮，比如：姓名（档案表），性别（档案表），年龄（档案表）;岗位(工资表)，工资(工资表)，职称(工资表)

我想实现在一个表板上实现以上字段的任意组合查询，比如，　我选姓名，工资　怎么实现，　这个问题我一直没有想通能给我解答一下吗？

作者: HG 时间: 2002-11-28 01:48
用VBA構造一個自動組合的SQL語句即可，當然也可以用用TSQL構造。
我用TSQL構造的代碼，太復雜，您想看麼。

作者: adge 时间: 2002-12-20 08:37
我想看，能贴上来吗？？？？

作者: runml 时间: 2003-1-1 06:45
Private Sub command18_Click()
strsql = "SELECT 型号,旧型号,规格尺寸,牌子,库存量,产地,类别,货位,报价 FROM 产品 where true"
If Not IsNull(grp1) Then strsql = strsql & " and (牌子=[forms]![按品牌类型查询]![grp1])"
If Not IsNull(grp2) Then strsql = strsql & " and 类别=[forms]![按品牌类型查询]![grp2]"
If Not IsNull(grp4) Then strsql = strsql & " and 货位=[forms]![按品牌类型查询]![grp4]"
If Not IsNull(grp5) Then strsql = strsql & " and 规格尺寸=[forms]![按品牌类型查询]![grp5]"
If Not IsNull(grp6) Then strsql = strsql & " and 产地=[forms]![按品牌类型查询]![grp6]"

Me![按品牌类型查询子窗体].Form.RecordSource = strsql
'DoCmd.OpenReport "按指定条件查询报表", acViewPreview, strsql
End Sub

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)