Foxtable(狐表)用户栏目专家坐堂 → [求助]专业报表网格线


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

主题:[求助]专业报表网格线

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


加好友 发短信
等级:童狐 帖子:260 积分:1957 威望:0 精华:0 注册:2020/3/7 22:50:00
[求助]专业报表网格线  发帖心情 Post By:2020/11/17 9:32:00 [只看该作者]

老师好:帮助中专业报表网格线设置属性如下:
GridLines本身又包括以下子属性:
All: 所有网格线
Bottom:底边框
Left: 左边框
Right: 右边框
Top: 上边框
Horz: 水平网格线
Vert: 垂直网格线

问题:我的表有连续多页,我想让每页表上下左右边框均设为0.5,用了以下代码:
打印后,中间表的上下边框还是单元格网格线宽度,然后又设置了Bottom:底边框及
Top: 上边框,中间页上下边框还是单元格网格线宽度,怎么调整呀?
rt.Style.GridLines.All = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Horz = new Prt.LineDef(Color.Gray)
rt.Style.GridLines.Vert = new Prt.LineDef(Color.
Gray)

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/17 9:55:00 [只看该作者]

还是没看明白帮助的说明啊

GridLines本身又包括以下子属性:
All: 所有网格线,包括了中间的网络线
Bottom:底边框
Left: 左边框
Right: 右边框
Top: 上边框
Horz: 水平网格线,包括了中间的网络线
Vert: 垂直网格线
,包括了中间的网络线

rt.Style.GridLines.All = New Prt.LineDef(0.5, Color.Black) 这个设置的是所有的网格线
rt.Style.GridLines.Horz = new Prt.LineDef(Color.Gray)这个设置的是所有的水平网格线
rt.Style.GridLines.Vert = new Prt.LineDef(Color.
Gray)这个设置的是所有的垂直网格线

第2·3句代码已经完全覆盖了第一句的设置,所以第一句完全没有意义

如果要设置上下左右不可,必须一个个设置
rt.Style.GridLines.top = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Left= New Prt.LineDef(0.5, Color.Black)
……

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


加好友 发短信
等级:童狐 帖子:260 积分:1957 威望:0 精华:0 注册:2020/3/7 22:50:00
  发帖心情 Post By:2020/11/17 10:10:00 [只看该作者]

老师,我上下左右分别设置了,可中间页还是没有上下边框

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/17 10:17:00 [只看该作者]

完整代码?

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


加好友 发短信
等级:童狐 帖子:260 积分:1957 威望:0 精华:0 注册:2020/3/7 22:50:00
  发帖心情 Post By:2020/11/17 10:22:00 [只看该作者]

rt.Style.GridLines.top = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Left= New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Right = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Bottom= New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Horz = new Prt.LineDef(Color.Gray)这个设置的是所有的水平网格线
rt.Style.GridLines.Vert = new Prt.LineDef(Color.

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


加好友 发短信
等级:童狐 帖子:260 积分:1957 威望:0 精华:0 注册:2020/3/7 22:50:00
  发帖心情 Post By:2020/11/17 10:22:00 [只看该作者]

rt.Style.GridLines.Vert = new Prt.LineDef(Color.Gray)这个设置的是所有的垂直网格线


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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/17 10:26:00 [只看该作者]

同样的原因,看2楼

后面2句代码已经完全覆盖了前面的设置

代码换个位置,先设置全部的再设置边框
[此贴子已经被作者于2020/11/17 10:26:34编辑过]

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


加好友 发短信
等级:童狐 帖子:260 积分:1957 威望:0 精华:0 注册:2020/3/7 22:50:00
  发帖心情 Post By:2020/11/17 10:58:00 [只看该作者]

老师,无论怎么排序代码,中间页还是没有上下0.5的边框,第一页有上
边框,最后一页有下边框,是不是这种设置不是针对每页的,是针对整个
doc文件的

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/17 10:59:00 [只看该作者]

请贴出完整全部的代码?!!

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


加好友 发短信
等级:童狐 帖子:260 积分:1957 威望:0 精华:0 注册:2020/3/7 22:50:00
  发帖心情 Post By:2020/11/17 11:08:00 [只看该作者]

第一种组合
rt.Style.GridLines.All = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Horz = new Prt.LineDef(Color.Gray) '这个设置的是所有的水平网格线
rt.Style.GridLines.Vert = new Prt.LineDef(Color.Gray) '这个设置的是所有的垂直网格线
第二种组合
rt.Style.GridLines.All = New Prt.LineDef( Color.Black)
rt.Style.GridLines.top = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Left= New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Right = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Bottom= New Prt.LineDef(0.5, Color.Black)
第三种组合
rt.Style.GridLines.Horz = new Prt.LineDef(Color.Gray) '这个设置的是所有的水平网格线
rt.Style.GridLines.Vert = new Prt.LineDef(Color.Gray) '这个设置的是所有的垂直网格线
rt.Style.GridLines.top = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Left= New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Right = New Prt.LineDef(0.5, Color.Black)
rt.Style.GridLines.Bottom= New Prt.LineDef(0.5, Color.Black)

 回到顶部
总数 16 1 2 下一页