以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请教 狐爸 表打印 标题字体大小设定代码怎么写?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=115427)

--  作者:jswjyjf
--  发布时间:2018/3/7 10:44:00
--  请教 狐爸 表打印 标题字体大小设定代码怎么写?
请教 狐爸 表打印 标题字体大小设定代码怎么写
如下
t.PrintInfo.OnlyPrintTitleOnFirstPage = False
With Tables(e.form.Name & "_Table2").PrintInfo
    .Title ="【" & vars("unitname") & "】每日资金回笼情况表"
    .subtitle = "日期" & e.Form.Controls("label1").text &  "至" & e.Form.Controls("label4").text
  \'  .PageFooter = "第[PageNo]页,共[PageCount]页"
  .PageFooter = ""
  
    .RightMargin=24
  .leftMargin=24
    
    .PageFooterLine = True
    .PaperKind = 9
.FitIntoPage = True
    
End With


--  作者:有点甜
--  发布时间:2018/3/7 11:04:00
--  

全部属性如下

 

PrinterName
PaperSource
PaperRawKind
PaperKind
PaperWidth
PaperHeight
LeftMargin
TopMargin
RightMargin
BottomMargin
LandScape
Title
SubTitle
PageHeader
PageFooter
PageHeaderLine
PageFooterLine
SpaceAfterPagerHeader
SpaceBeforePagerFooter
SpaceAfterTitle
SpaceAfterSubtitle
PageHeaderFont
PageFooterFont
TitleFont
SubtitleFont
PageColumns
WaterMark
RepeatFixedRows
RepeatFixedCols
PrintFixedCols
ExcuteDrawCell
FitIntoPage
WrapMemo
ExtendMemoRow
OnlyPrintTitleOnFirstPage
AdjustFontSize
OnlySelectedRows
Renumber
EnableStyle
PrintTitle
PrintHeader
PrintFooter
ExtendLastCol
DirectFitIntoPage
DirectFitIntoOnePage
DirectExtendLastCol
DirectPageHeader
DirectPageFooter
DirectHighLight
DirectPageHeaderFont
DirectPrintHeader
DirectPrintFooter
 
 

--  作者:jswjyjf
--  发布时间:2018/3/7 11:21:00
--  
我是指  .Title ="【" & vars("unitname") & "】每日资金回笼情况表"  这里的字体大小
--  作者:有点甜
--  发布时间:2018/3/7 11:33:00
--  
设置 .TitleFont = new font("宋体", 20)
--  作者:jswjyjf
--  发布时间:2018/3/7 11:37:00
--  
太感谢了