用导航打开主题
Sets or returns the object's text font name.
Applies to barcode and text objects
Objects(<object name or index>).FontName = Font
Where Font is the font name of the object's text.