autocad2002 关于字体的vb编程

lgc-ty · 发表于 2005-4-4 12:53:00

朋友们:

   我在插入块时,块的属性文本变成"???",怎样才能启动cad时就把字体名设为：宋体呢？

   我想在AutoCAD2002启动时,就加栽"宋体",如何实现(vba或vb)?

   lgc

yulijin608 · 发表于 2005-4-4 13:00:00

Dim txtStyle As Object
Set txtStyle = newDoc.ActiveTextStyle
txtStyle.SetFont "宋体", False, False, 1, 1

yulijin608 · 发表于 2005-4-4 13:05:00

补充一下,我是在VB中写的,其中的newDoc为当前的ActiveDocument.

lgc-ty · 发表于 2005-4-6 16:07:00

十分感谢yulijin608，我试试看

另外，还有个问题请教：

如何通过菜单实现工具条的显示与隐藏？

我用的是autocad2002和vba

账号		自动登录	找回密码
密码			注册