以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 在菜单项里利用临时表统计问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114999) |
-- 作者:weipeng6999 -- 发布时间:2018/2/27 15:16:00 -- 在菜单项里利用临时表统计问题 请教老师:我想在菜单项里利用临时表进行统计。 1、运行下段程序正常,能在主表中筛选出来 Dim dt1 As RibbonMenu.DatePicker = RibbonTabs("功能区1").Groups("统计").Items("日期输入框1") Dim dt2 As RibbonMenu.DatePicker = RibbonTabs("功能区1").Groups("统计").Items("日期输入框2") Dim Filter As String Filter = "寄出时间 >= #" & dt1.value & "# And 寄出时间 <= #" & dt2.value & "#" Tables("收件信息").Filter = Filter 2、但是我想利用临时表进行统计就报错 .NET Framework 版本:2.0.50727.8669 Foxtable 版本:2017.10.26.1 错误所在事件:菜单,统计,Click 详细错误信息: 未将对象引用设置到对象的实例 我的代码如下: Dim dt1 As RibbonMenu.DatePicker = RibbonTabs("功能区1").Groups("统计").Items("日期输入框1") Dim dt2 As RibbonMenu.DatePicker = RibbonTabs("功能区1").Groups("统计").Items("日期输入框2") Dim b As New GroupTableBuilder("统计表",DataTables("收件信息")) b.Filter = "寄出时间 >= #" & dt1.value & "# And 寄出时间 <= #" & dt2.value & "#" b.Totals.AddDef("收件信息_姓名") b.Totals.AddDef("收件信息_单位名称") b.Totals.AddDef("寄出时间") b.Build \'生成统计表 MainTable = Tables("统计表") |
-- 作者:weipeng6999 -- 发布时间:2018/2/27 15:53:00 -- 自己查到原因了,是我粗心了。 |