Office中国论坛/Access中国论坛

标题: 求助:交叉表条件问题 [打印本页]

作者: 一克拉小猎 时间: 2010-8-6 12:18
标题: 求助:交叉表条件问题
大虾好，我在做交叉查询的时候碰到几个问题，请教下，非常感谢。
   附件中的MDB内容：
         表： F-TSS
         查询:  TSS_req1（用[Forms]![main]![Text0],做条件的交叉表），TSS_req2（用函数tt()做条件的交叉表）
         窗体: TSS_req2_win,  main
   问题：
         1：TSS_req1查询时提示说 [Forms]![main]![Text0]不能识别为一个有效的字段名.可是在选择查询里是可以的
         2：然后我把条件换成tt()，oK了，可是在变量值为“*”时，却没有效果。
   麻烦大家了，多谢`````

[attach]43013[/attach]

作者: 一克拉小猎 时间: 2010-8-6 13:59
自己点几下，顶一顶```

作者: 一克拉小猎 时间: 2010-8-6 14:16
在顶顶，不要沉

作者: 一克拉小猎 时间: 2010-8-6 14:43
再顶起，麻烦大家帮我看看，多谢````

作者: todaynew 时间: 2010-8-6 15:13
我也遇到过，不知道原因。后来是在VB中用me.控件名.value解决的。

作者: 一克拉小猎 时间: 2010-8-6 16:12
回复 todaynew 的帖子

能不能写个实例给我····

····麻烦你了```要是不介意的话```可以在我那个例子上改```

作者: 一克拉小猎 时间: 2010-8-6 16:18
在交叉表中，我如果在课名（字段名）下输入*，查询出来就是所有记录，可如果我把*赋值给函数tt()，然后在交叉表的条件中填tt(),却查出来是空记录，我想了一天了都解决不了，麻烦你拉`````实在找不出解决方法了```

作者: todaynew 时间: 2010-8-6 16:42
本帖最后由 todaynew 于 2010-8-6 16:46 编辑

在交叉表中，我如果在课名（字段名）下输入*，查询出来就是所有记录，可如果我把*赋值给函数tt()，然后在交 ...
一克拉小猎发表于 2010-8-6 16:18

[attach]43014[/attach]

[attach]43015[/attach]

Function 创建交叉查询()
Dim Qdef As QueryDef
Dim strSQL As String
strSQL = "TRANSFORM Sum([TSS人数]*[TSS时间]) AS TSS合计 "
strSQL = strSQL & "SELECT F_TSS.日付, F_TSS.课名, F_TSS.机种 "
strSQL = strSQL & "FROM F_TSS "
strSQL = strSQL & "WHERE F_TSS.课名='" & Me.[Text0].Value & "' "
strSQL = strSQL & "GROUP BY F_TSS.日付, F_TSS.课名, F_TSS.机种 "
strSQL = strSQL & "PIVOT F_TSS.TSS区分;"
If DCount("*", "MSysObjects", "Type=5 and Name='TSS_req1'") = 0 Then
Set Qdef = CurrentDb.CreateQueryDef("TSS_req1")
Qdef.SQL = strSQL
Else
Set Qdef = CurrentDb.QueryDefs("TSS_req1")
Qdef.SQL = strSQL
End If
Qdef.Close
Set Qdef = Nothing
End Function

作者: sgrshh29 时间: 2010-8-6 16:48
回复 一克拉小猎 的帖子
[attach]43017[/attach]

作者: 一克拉小猎 时间: 2010-8-9 08:39
本帖最后由一克拉小猎于 2010-8-9 09:00 编辑

回复 sgrshh29 的帖子

多谢哈```可是，组合框里如果是空的的话，还是无法筛选呢~····

作者: 一克拉小猎 时间: 2010-8-9 09:13
回复 sgrshh29 的帖子

不好意思哈，是我没有仔细看``问题解决了~·```谢谢噢````

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