Foxtable(狐表)用户栏目专家坐堂 → 用赋值后,如何再取消?


  共有2185人关注过本帖树形打印复制链接

主题:用赋值后,如何再取消?

美女呀,离线,留言给我吧!
DLW77
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:188 积分:1699 威望:0 精华:0 注册:2018/2/26 13:15:00
用赋值后,如何再取消?  发帖心情 Post By:2018/7/25 19:06:00 [显示全部帖子]

老师,我通过赋值筛选了科目汇总表的年月,但报表出来后,我退出时,想撤销筛选,把所有的内容显示出来,这个要怎么操作好?是在窗品再加个按扭写代码,还是怎样?代码要怎样写?
如,我通过这个代码按查询键查2018-01的内容,科目汇总表筛选出了2018-01的内容,我退出这个窗口后,科目汇总表还是只显示2018-01的内容,而不是2018-02/2018-03等全部的内容。我是想退出查询后可以显示全部内容。
DataTables("科目汇总表").LoadFilter = "年月 = '" & Vars("查询日期") & "'"
DataTables("科目汇总表").Load
Dim Book As New XLS.Book(ProjectPath & "Attachments\资产负债表.xls")
Dim fl As String = ProjectPath & "Reports\资产负债表.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

图片点击可在新窗口打开查看此主题相关图片如下:7al(00`rn$$t5{q@fka2q.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:0fh@9y)%ld6%egqp6(1spa.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看
[此贴子已经被作者于2018/7/25 19:06:36编辑过]

 回到顶部
美女呀,离线,留言给我吧!
DLW77
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:188 积分:1699 威望:0 精华:0 注册:2018/2/26 13:15:00
可以了,谢谢老师  发帖心情 Post By:2018/7/25 21:31:00 [显示全部帖子]

可以了,谢谢老师

 回到顶部