linux1234 发表于 2008-4-1 13:21:00

[求助]图形更新问题

<p>我有下面一段代码最后部分:</p><p><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ThisDrawing.ActiveTextStyle.fontFile = Trim(uufontfile_new.Text)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ThisDrawing.ActiveTextStyle.BigFontFile = Trim(uubigfontfile_new.Text)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MsgBox "当前文字样式替换完毕!", vbOKOnly, "当前文字样式替换"</p><p><br/>将当前字体(现为乱码)更换为需要的字体类型,以取消乱码,我原来是用lsp做的,可以马上看到效果,可现在用vba不能理解看到效果,就是在autocad命令行输入regen也无效,只有将所有图元选中,移动一点距离就可以了,不知在VBA里如何解决这个问题呢?</p><p>update当前视口也无效!</p>

linux1234 发表于 2008-4-3 21:37:00

<p>已解决,不知以前为何regen无效,这次在VBA代码最后,加了thisdrawing.sendcommand("regen "),好了!</p>
页: [1]
查看完整版本: [求助]图形更新问题