如何在CAD的命令行屏蔽VBA自动图形处理信息

torch · 发表于 2004-7-15 15:58:00

如何在CAD的命令行屏蔽VBA自动图形处理信息

在采用VBA设计的CAD程序中，会在CAD下采用List命令获得图形的处理信息，如何采用VBA将这些信息屏蔽掉，或者让它不可查。

zfbj · 发表于 2004-7-16 08:54:00

Public Sub UndefineList()
ThisDrawing.SendCommand "undefine" & vbCr & "list" & vbCr
End Sub Public Sub RedefineList()
ThisDrawing.SendCommand "redefine" & vbCr & "list" & vbCr
End Sub

torch · 发表于 2004-7-16 16:00:00

谢谢！您只不过屏蔽了命令，但是没有屏蔽list的信息，只要开启命令就可以重新看到list的信息了，请教是否有更加先进的办法。

wyj7485 · 发表于 2004-7-16 17:34:00

(setvar "cmdecho" 0)

齿轮设计 · 发表于 2004-9-19 12:16:00

四楼怎么用LISP帮人啊，人家说好是VBA嘛。

我想是这样：

ThisDrawing.SetVariable "cmdecho", 0

雪山飞狐_lzh · 发表于 2004-9-19 13:56:00

cmdecho系统变量对Sendcommand方法是无效的

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