还要版主回答，你说的早使过了

nxy_918 · 发表于 2003-4-4 12:30:00

请版主回答的问题（菜鸟免进）
我想把一个CAD文件的所有的TextStyle的Font Name 换成“宋体“以便它在中文显示正常,但是第四行程序程序可通过，不起效果；但是把第四句换成下面语句即可
4  acaddoc1.TextStyles.Item(j).fontFile = "txt"，不过"txt"无法正常显示中文
源程序片断如下：请版主或那位高手指教
......
1  TScount = acaddoc1.TextStyles.Count
2  For j = 0 To TScount - 1
3    acaddoc1.TextStyles.Item(j).fontFile = "c:\winnt\fonts\SIMSUN.TTF"
4  Next j