页面设置标题小计字体大一些代码怎么写请教？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

请教页面设置标题小计字体大一些代码怎么写请教？

Dim t As Table = Tables(e.form.Name & "_Table1")

t.PrintInfo.OnlyPrintTitleOnFirstPage = False

With Tables(e.form.Name & "_Table1").PrintInfo

.Title = e.Form.Controls("combobox1").value

.subtitle = "日期" & e.Form.Controls("startdate").value & "至" & e.Form.Controls("enddate").value

.PageFooter = "第[PageNo]页,共[PageCount]页"

.PageFooterLine = True

.PaperKind = 9

.FitIntoPage = True

.LeftMargin = 10 '设置左边距

.RightMargin = 10 '设置右边距

.TopMargin = 10 '设置上边距

.BottomMargin = 10 '设置下边距

End With

主题：页面设置标题 小计字体大一些 代码怎么写 请教？