Foxtable(狐表)用户栏目专家坐堂 → 专业报表表格对象内的字体怎么设置?


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

主题:专业报表表格对象内的字体怎么设置?

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


加好友 发短信
等级:三尾狐 帖子:698 积分:5612 威望:0 精华:0 注册:2013/4/9 6:59:00
专业报表表格对象内的字体怎么设置?  发帖心情 Post By:2019/1/16 10:47:00 [只看该作者]

有文本对象,字体是不一样的。文本对象的字体找到代码。
表格对象的字体怎么规定?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/16 12:17:00 [只看该作者]

参考

 

Dim doc As New PrintDoc '定义一个报表
Dim rt As New prt.RenderTable() '定义一个表格对象
doc.Body.Children.Add(rt) '将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef '设置网格线
'下面的代码向表格中填入值
rt.style.Font = new font("宋体", 18)
For r As Integer = 0 To 5
    For c As Integer = 0 To 5
        Dim rx As New prt.RenderText '定义一个文本对象
        rx.Text = r & "," & c '为文本对象设置内容
        rt.Cells(r, c).RenderObject = rx '将文本对象放置在单元格中
    Next
Next
rt.cells(1,2).style.font = new font("宋体", 25)
doc.Preview() '预览报表


 回到顶部