Tables("表A").Font = New Font("黑体",12,FontStyle.Underline)
http://www.foxtable.com/help/topics/0494.htm