请教：字体设置问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以下的代码，有3个问题请教各位老师：

1、请问打印的标题字号及颜色怎么设置，

2、打印日期显示“2016/3/26”，显示“2016年3月26日”怎么修改，

3、页脚左边是打印页数，右边是日期，是否必须中间用空格调整，能否分开设置，打印页数左对齐，打印日期右对齐？

Dim d As Date = Date.Today

With Tables("刷卡统计_table1").PrintInfo

.Title = "消费统计表"

.PageFooter = "第[PageNo]页,共[PageCount]页打印日期:" & d

.PageFooterLine = True

.PaperKind = 9

.FitIntoPage = True

End With

Tables("刷卡统计_table1").Print(True,False)

主题：请教：字体设置问题