以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]不知道哪里出问题了 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84989) |
-- 作者:luckier -- 发布时间:2016/5/14 19:50:00 -- [求助]不知道哪里出问题了 Current Table.Select(0,1) \'移动到姓名列 Syscmd.Filter.Equal() Forms("人员查找").show Dim Filter As String With e.Form.Controls("StartDate") If .Value IsNot Nothing Then If Filter > "" Then Filter = Filter & " And " End If Filter = Filter & "日期 >= #" & .Value & "#" End If End With With e.Form.Controls("EndDate") If .Value IsNot Nothing Then If Filter > "" Then Filter = Filter & " And " End If Filter = Filter & "日期 < #" & .Value.AddDAys(1) & "#" End If End With Tables("人员信息").Filter = Filter Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1") txt.Value=Tables("病患信息").Rows.Count Dim Sum As Double=Taables("人员信息").comput("sum(离开天数)") txt2.Value=Sum 主要想先按人名筛选完毕后,再按时间筛选,可是运行结果只是筛选时间,有好几个人,我这是哪里错了 |
-- 作者:Hyphen -- 发布时间:2016/5/15 13:45:00 -- 上传例子测试 |
-- 作者:大红袍 -- 发布时间:2016/5/15 22:33:00 -- 报什么错?还是统计结果不正确? |
-- 作者:luckier -- 发布时间:2016/5/16 8:07:00 -- 我想先按照人名筛选,然后再按照时间筛选,可是执行之后,只是按照时间筛选,找不出原因 |
-- 作者:大红袍 -- 发布时间:2016/5/16 9:22:00 -- 以下是引用luckier在2016/5/16 8:07:00的发言:
我想先按照人名筛选,然后再按照时间筛选,可是执行之后,只是按照时间筛选,找不出原因
你为什么不直接在窗口里面,加入人员的文本框,直接在那里填写以后再筛选? |
-- 作者:大红袍 -- 发布时间:2016/5/16 9:24:00 -- 如果需要在原来的基础上再筛选,改一下代码
Dim f As String = Tables("人员信息").Filter Tables("人员信息").Filter = iif(f > "", "(" & f & ") and (" & filter & ")", filter) |
-- 作者:luckier -- 发布时间:2016/5/18 11:05:00 -- 我在窗口中建立了一个combobox,怎么把这个内容提取出来,再进行筛选。比如选择了一个。。。‘’部门一‘’。。。部门一,怎么提取出来进行筛选 |
-- 作者:大红袍 -- 发布时间:2016/5/18 11:06:00 -- 不明白你的意思,上传实例说明。 |
-- 作者:luckier -- 发布时间:2016/5/18 11:17:00 -- 就是本贴的例子,红大哥你不是说可以在一个窗口中加入人员文本框,进行筛选吗。我加入了以后,怎么知道输入的是谁的名字,进行筛选?代码怎么写 |
-- 作者:大红袍 -- 发布时间:2016/5/18 11:19:00 -- 参考
http://www.foxtable.com/help/topics/1058.htm
|