问个简单问题(关于视图)

freshairfly · 发表于 2003-4-25 09:46:00

如何在程序中实现点击菜单
【视图】/【三维视图】/【俯视】
【视图】/【着色】/…… 的效果

能不用 SendCommand 最好
如果不能不用 SendCommand 就请你告诉我怎么用 SendCommand 实现上述效果

efan2000 · 发表于 2003-4-25 12:58:00

SendCommand是发送CAD的内部命令到命令行，跟在命令行上直接键入命令的效果是一样的，但是怎么知道要发送什么命令和命令的格式是怎样的？先在CAD中，运行自己想要处理的命令。如：运行“视图”菜单中的“三维视图”-“俯视”，在命令行上显示：_-view Enter an option
[?/Orthographic/Delete/Restore/Save/Ucs/Window]: _bottom Regenerating model.。这个就是命令运行的过程。那么使用SendCommand时就可以这样写：SendCommand "-view" & vbcr & "bottom"，注意了吗，vbcr在VBA中是换行的意思，相当于在命令行上按了回车键或者空格键。其它的命令也是类似，自己捉摸一下就会明白的。

freshairfly · 发表于 2003-4-25 18:02:00

谢谢斑竹的热心讲解 ^_^
SendCommand 的用法我知道
只是执行
docOpen.SendCommand "view" & vbCr & "top"
这一句后 AutoCAD 会出现一个对话框
不知道为什么

hq_2003 · 发表于 2003-4-25 18:16:00

freshairfly · 发表于 2003-4-25 18:19:00

efan2000 · 发表于 2003-4-25 20:09:00

运行命令行时，有没有注意到前面有一个横杠“-”，加上这个表示运行时不显示对话框。你的语句应该是：docOpen.SendCommand "-view" & vbCr & "top"。

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

问个简单问题(关于视图)

关于SendCommand的用法

斑竹,你试过没有？

把“docOpen.SendCommand "view" & vbCr & "top" “中的view改为“-view"即可

哦，我试试看！

View之前漏了一个横杠“-”