QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 2820|回复: 1
收起左侧

[已解决] VBA如何获得光标位置?

[复制链接]
发表于 2006-7-20 18:27:19 | 显示全部楼层 |阅读模式 来自: 中国上海

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
VBA如何获得光标位置?相对于鼠标移动事件???9 Z2 P: s9 I& I" n/ v3 F
+ H' ~+ ^+ y  Z$ p' b  ~
[ 本帖最后由 唐昕晨 于 2009-1-10 16:06 编辑 ]
发表于 2008-6-10 12:33:44 | 显示全部楼层 来自: 中国浙江宁波
VBA实现有难度,可以考虑使用lisp函数grread实现!
! C- s; W! v4 B$ l7 n! N) ?( e据说VBA利用下面的VLAX.CLS可以实现,原理也是让VBA执行LISP的GRREAD函数$ q7 p! H' m" D1 B0 I
按下面是实例:( t3 i& s  }; `- h7 W8 Y; o! D
Import VLAX.cls
! L$ J( b$ F0 d& YSub TEST()
7 N3 \5 o  e9 V8 B4 R* JDim VL As New VLAX
; f* x  s8 f4 O# c  _. z1 X3 ~+ ?Dim pt As Variant! G# u' r" m: d* a
pt = VL.EvalLispExpression("(VLAX-3D-POINT (CADR (GRREAD t))) ")
; i% L0 q8 o. z% QMsgBox pt(0) & ", " & pt(1) & ", " & pt(2)
  t/ g% B1 s4 G7 s9 h( I' cEnd Sub
3 K+ O6 C8 V9 z% q9 x' l0 ], \
; n6 _6 V7 O& g  Z1 g# `转自明经通道
) V* E& Q5 B- z% y2 V5 G' l+ Q! G) Y% V1 x" ^. F
[ 本帖最后由 sealive_leafage 于 2008-6-10 13:18 编辑 ]

200310313553755958.txt

4.29 KB, 下载次数: 15

评分

参与人数 1三维币 +5 收起 理由
woaishuijia + 5 应助

查看全部评分

发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表