请版主回答的问题（菜鸟免进）

nxy_918 · 发表于 2003-4-3 22:08:00

我想把一个CAD文件的所有的TextStyle的Font Name 换成“宋体“以便它在中文显示正常,但是第四行程序出错:Filer error；但是把第四句换成下面语句即可
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 = "SIMSUN.TTF"
4  Next j