兰州人 发表于 2008-10-30 13:46:00

宋体设置的一种方法。

&nbsp;'设置字体为宋体<br/>Dim typeface As String<br/>Dim textbold As Boolean<br/>Dim textitalic As Boolean<br/>Dim textcharset As Long<br/>Dim textpfamily As Long<br/>ThisDrawing.ActiveTextStyle.GetFont typeface, _<br/>textbold, textitalic, textcharset, textpfamily<br/>typeface = "宋体"<br/>ThisDrawing.ActiveTextStyle.SetFont typeface, _<br/>textbold, textitalic, textcharset, textpfamily<br/>ThisDrawing.Regen acActiveViewport<br/>
页: [1]
查看完整版本: 宋体设置的一种方法。