以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 专业报表中,同一表格,如何部分字体加粗? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56568) |
-- 作者:蓝色理想 -- 发布时间:2014/9/9 10:01:00 -- 专业报表中,同一表格,如何部分字体加粗? Dim rt As New prt.RenderTable() \'定义一个表格对象 rt.Width=240 \'设置表格总宽度 doc.Body.Children.Add(rt) \'将表格对象加入到报表中 rt.Style.GridLines.All = New prt.Linedef \'设置网格线 rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center \'所有文本内容水平居中对齐 rt.Style.TextAlignVert = prt.AlignHorzEnum.Center \'所有文本内容垂直居中对齐 rt.Style.Font = New Font("宋体", 13,FontStyle.Bold) \' FontStyle.Regular) \'设置字体 rt.Cells(4,1).Text 中文字分为两部分 1、 ”开发项目:“ 要加黑 2、”AABBCC工程“ 不要加黑 请问高手,如何实现?
|
-- 作者:Bin -- 发布时间:2014/9/9 10:03:00 -- http://www.foxtable.com/help/topics/1183.htm |
-- 作者:蓝色理想 -- 发布时间:2014/9/9 10:35:00 -- 不是一个事啊,版主的是段落 我的是表格中的一个单元格 我需要在表格的一个单元格中实现这个效果
|
-- 作者:Bin -- 发布时间:2014/9/9 10:36:00 -- 在单元格里加入段落对象,才能实现这个效果. |
-- 作者:蓝色理想 -- 发布时间:2014/9/9 10:38:00 -- 请指点一下,如何加入段落 |
-- 作者:蓝色理想 -- 发布时间:2014/9/9 10:39:00 -- 我没找到单元格加入段落的方法 |
-- 作者:蓝色理想 -- 发布时间:2014/9/9 10:51:00 -- 自己顶一下,等版主指点 |
-- 作者:有点甜 -- 发布时间:2014/9/9 11:25:00 -- 参考
dim rx As New prt.RenderText \'定义一个文本对象 |
-- 作者:蓝色理想 -- 发布时间:2014/9/9 11:52:00 -- 收到,谢谢 我最终用的是这个 Dim rpar As New prt.RenderParagraph() \'定义一个段落对象 Dim ra As prt.RenderArea ra = rt.Cells(4,1).Area \'引用单元格的容器 ra.Children.Add(rpar) |