- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 查询与打印 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126458)
-- 发布时间：2018/10/22 13:50:00
-- 查询与打印
~CSUZJFE)D_9S3RW(A[U.png)
如图，如果我要查询2019年度的，然后表显示2019年度的
如果我要查询2020年度的，然后表显示2020年度的
打印也一样，
如何实现
-- 发布时间：2018/10/22 13:52:00
--
此主题相关图片如下：7p)~csuzjfe)d_9s3rw(au.png
-- 发布时间：2018/10/22 15:13:00
--
Dim str As String = e.form.controls("textbox1").text
Dim d as date = new date(val(str), 1, 1)
e.form.controls("Table1").Table.filter = "计划时间 >= #" & d & "# and 计划时间 < #" & d.addyears(1) & "#"
[此贴子已经被作者于2018/10/22 15:13:02编辑过]