[求助]为什么文字都成问号了乐筑天下

deng163 发表于 2007-8-4 10:47:00

[求助]为什么文字都成问号了

请教各位高手:
      我在用以下语句向CAD中添加汉字时,为什么汉字都成问号了?
            textstring="谢谢指导!"
            Set textObj = ThisDrawing.ModelSpace.AddText(textString, insertionPoint, height)
或者:    Set MTextObj = ThisDrawing.ModelSpace.AddMText(textString, insertionPoint, height)
是不是添加汉字不能用这两个方法啊?

deng163 发表于 2007-8-5 16:13:00

顶顶!
各位大侠帮帮忙啊!急用!
不胜感激!

烟雨.江南 发表于 2007-8-6 17:32:00

当前字体中没有汉字字形。把字体设置成宋体之类的，应该就会显示出来了。

yusicad 发表于 2007-8-9 21:31:00

你用LIST命令查看一个文字，看下它的“文字样式”，然后在STYLE修改就可以了。

天龙八部 发表于 2007-8-14 17:58:00

先设置文字样式，GETFONT,SETFONT

deng163 发表于 2007-8-15 20:30:00

问题解决了!
我用了以下语句重新设置了ＣＡＤ的字体，汉字就不会变成问号了！
typeFace = "宋体"
ThisDrawing.ActiveTextStyle.SetFont typeFace, Bold, Italic, charSet, PitchandFamily
谢谢楼上几位大侠！！不胜感激！！

页: [1]

乐筑天下's Archiver

[求助]为什么文字都成问号了