Foxtable(狐表)用户栏目专家坐堂 → 关于汇总模式下的编辑


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

主题:关于汇总模式下的编辑

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


加好友 发短信
等级:童狐 帖子:215 积分:1584 威望:0 精华:0 注册:2015/12/25 22:30:00
关于汇总模式下的编辑  发帖心情 Post By:2016/12/14 21:16:00 [只看该作者]

代码如下:
Dim t As Table = Tables("借支表")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "日期"
g.TotalOn = "金额"
g.Caption = "{0}月 小计"
g.DateGroup = DateGroupEnum.Month
t.SubtotalGroups.Add(g)

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "姓名"
g.TotalOn = "金额"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)

t.Subtotal()
帮助里说汇总模式是临时表,是只读的,无法编辑的,为什么代码写的汇总模式竟然可以编辑
而且如果编辑了,每次都会有一行跟着变换姓名,好乱。一没有注意就汇总模式下编辑了

帮我看看代码哪里出问题了
[此贴子已经被作者于2016/12/14 21:16:43编辑过]

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/14 21:32:00 [只看该作者]

测试没有问题,上例子看看

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


加好友 发短信
等级:童狐 帖子:215 积分:1584 威望:0 精华:0 注册:2015/12/25 22:30:00
回复:(有点蓝)测试没有问题,上例子看看  发帖心情 Post By:2016/12/15 13:57:00 [只看该作者]

我的是表无法编辑,双击打开新增窗口。
在汇总模式下,双击也能打开窗口,窗口上就能修改图片点击可在新窗口打开查看
如何设置窗口在汇总模式下无法编辑修改

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/15 14:36:00 [只看该作者]

以下是引用js4222在2016/12/15 13:57:00的发言:
 
如何设置窗口在汇总模式下无法编辑修改

 

判断一下不就好了?

 

If Tables("表A").IsSubtotal then

    '写你要写的代码

End If


 回到顶部