可以:
Dim fnt As New Font("宋体",12,FontStyle.Bold Or FontStyle.Underline)Tables("表A").Font = fnt
看看:
http://www.foxtable.com/help/topics/0494.htm