|
语句如下:
Set currTextStyle = ThisDrawing.TextStyles.Add("gkt")
ThisDrawing.ActiveTextStyle = currTextStyle
ThisDrawing.ActiveTextStyle.SetFont "楷体_GB2312", False, False, CharSet, PitchAndFamily
名为gkt的文字样式生成了,其字体名也已经被改为"楷体_GB2312",但显示时却为宋体,必须在CAD的文字样式设置中重新刷新后,才能正常显示,不知是什么原因。
请各位大侠指教!!!
|
|