xxxx 发表于 2002-6-12 14:37:00

VBA与透明命令 请教

我想在用getpoint取得点时，要透明运行移动视图然后再取点。如何实现?

efan2000 发表于 2002-7-6 14:29:00

Re: VBA与透明命令

试着这种方法：
on error goto errtrap
dim pt as variant
pt=thisdrawing.utility.getpoint(,"选择点: ")

errtrap:
if err.number=-2147352567 Then '可能是透明命令
    err.clear
    resume
end if

mccad 发表于 2002-6-12 16:00:00

目前版本的AutoCAD存在着缺陷，在VBA运行期间，通过菜单或工具条的透明命令无效

你试着在VBA运行期间(如getpoint时)，直接在命令行中输入'zoom试试，这样才是有效的透明命令(但这种方法谁都觉得麻烦)。

河伯 发表于 2002-6-14 23:18:00

按住鼠标中健。2000以后，zoom和pan已经无所谓“透明”了。

zeuce 发表于 2002-10-16 19:40:00

高，好办法

本帖最后由 作者 于 2002-10-16 19:40:19 编辑

我正准备向各位请教，如何在捕捉点时用透明明令，搜索到这个方法，真是高，解决我的大问题。

zeuce 发表于 2002-10-16 19:46:00

补充一点，用右键或空格退出

用这种方法在画直接和多义线等时，用ESC不能退出，可能透明命令的错误代码与此相同，这时用空格和右键退出就可以正常操作。

xh_ldh 发表于 2002-10-17 10:19:00

疑问

没有中键怎么办？？

mccad 发表于 2002-10-17 20:08:00

没有鼠标就更麻烦了!其实现在带中键及滑轮的鼠标很便宜，一点小小的投资是值得的

zeuce 发表于 2002-10-20 18:38:00

光是中键有些时候不管用。

很多时候要进行框选放大，这时中键及滑轮就没有办法了。
页: [1]
查看完整版本: VBA与透明命令 请教