以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  表打印的字体大小 在哪里可以设置?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83102)

--  作者:jswjyjf
--  发布时间:2016/3/31 13:14:00
--  表打印的字体大小 在哪里可以设置?
With Tables("订单").PrintInfo
    .
Title = "2011年9月订单"
    .
PageFooter = "第[PageNo]页,共[PageCount]页"
    .
PageFooterLine = True
    .
PaperKind = 9
    .FitIntoPage = 
True
End With
Tables(
"订单").Print(True,False)

表打印的字体大小 在哪里可以设置?

--  作者:大红袍
--  发布时间:2016/3/31 14:45:00
--  

内容的字体?可以直接设置表的字体。

 

dim tf = Tables("表A").font
Tables("表A").font = new font("宋体", 15)
Tables("表A").Print(true, false)
Tables("表A").font = tf