- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]请教查询明细 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=133789)
-- 发布时间：2019/4/20 13:49:00
-- [求助]请教查询明细
老师下午好，我简单做了一个表学习，不知道这个查询按钮的代码该如何写，希望通过这个资金账户，或者资金账户+科目名称或者录入日期，来查询这个收入明细，能否指点一下，文件已经传上去了
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目6.table |
-- 发布时间：2019/4/20 14:09:00
--
首先查询用的文本框，组合框不要绑定列。
然后查询按钮
Dim Filter As String
With e.Form.Controls("资金账户")
If .Value IsNot Nothing Then
Filter = "资金账户 = \'" & .Value & "\'"
End If
End With
With e.Form.Controls("科目名称")
If .Value IsNot Nothing Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "科目名称 = \'" & .Value & "\'"
End If
End With
Tables("收入记账").Filter = Filter
-- 发布时间：2019/4/20 14:20:00
--
好的，谢谢老师