VBA与透明命令请教

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

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

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

试着这种方法：
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

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

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

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

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

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

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

没有中键怎么办？？

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

很多时候要进行框选放大，这时中键及滑轮就没有办法了。

VBA与透明命令请教

发表回复

精选推荐

VBA与透明命令 请教

发表回复

精选推荐

VBA与透明命令请教