Foxtable(狐表)用户栏目专家坐堂 → 表格作为副本报错


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

主题:表格作为副本报错

帅哥哟,离线,有人找我吗?
wangglby
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:337 积分:3225 威望:0 精华:0 注册:2020/2/25 23:12:00
表格作为副本报错  发帖心情 Post By:2021/9/21 0:36:00 [只看该作者]

窗口的表格作为副本,每次打开窗口时报错如下


错误所在事件:表A,AfterSelRangeChange
详细错误信息:
给定关键字不在字典中.
表A的 AfterSelRangeChange代码为:

If e.Form IsNot Nothing Then
    Dim it1 As Winform.StripItem = e.Form.Strips("状态栏").Items("Stat")
  Dim t As Table = e.Table    
    it1.Text = ""
  it1.Text = "合计: " & t.Aggregate(AggregateEnum.Sum,t.TopRow,t.leftCol,t.BottomRow,t.rightCol) & " 计数: " & t.Aggregate(AggregateEnum.Count,t.TopRow,t.leftCol,t.BottomRow,t.rightCol) & " 平均: " & t.Aggregate(AggregateEnum.average,t.TopRow,t.leftCol,t.BottomRow,t.rightCol)
   End If


我看帮助里面 副本的表格 并没有  AfterSelRangeChange 的单独事件可以设置  
请问怎么解决?


[此贴子已经被作者于2021/9/21 8:49:32编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105965 积分:538900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/22 9:18:00 [只看该作者]

表A的 AfterSelRangeChange代码改为:

If Forms("xx窗口").opened Then
    Dim it1 As Winform.StripItem = Forms("xx窗口").Strips("状态栏").Items("Stat")
  Dim t As Table = e.Table    
    it1.Text = ""
  it1.Text = "合计: " & t.Aggregate(AggregateEnum.Sum,t.TopRow,t.leftCol,t.BottomRow,t.rightCol) & " 计数: " & t.Aggregate(AggregateEnum.Count,t.TopRow,t.leftCol,t.BottomRow,t.rightCol) & " 平均: " & t.Aggregate(AggregateEnum.average,t.TopRow,t.leftCol,t.BottomRow,t.rightCol)
   End If

 回到顶部