用VBA如何才能取得由LISP加载的变量?

wyj7485 · 发表于 2005-6-25 12:06:00

用VBA如何才能取得由LISP加载的变量?

我的思路是:

先用lisp加载的变量

(setq a 100)

再用vba如下处理:

ThisDrawing.SendCommand "users1" & vbCr & "!a" & vbCr

b = ThisDrawing.GetVariable("USERS1")

但!a并没有把100传递到系统变量users1中.

怎样才能取得呢?

王咣生 · 发表于 2005-6-25 14:02:00

使用USERI1~5吧,存储Integer类型值

ThisDrawing.SendCommand "useri1" & vbCr & "!a" & vbCr

zhuxuhong · 发表于 2005-6-25 14:04:00

你既然用LISP赋值了，为什么不直接用LISP给USERS1赋值呢？

这样用VBA调取不就没问题了？

wyj7485 · 发表于 2005-6-25 15:40:00

users只有5个啊,假如我有几十个这样的变量就不行了.

知道变量名,只是利用users1起一个中介作用,因为GetVariable只能取得系统变量,可惜不能实现.

wyj7485 · 发表于 2005-6-25 17:30:00

我已经解决了: ThisDrawing.SendCommand "!a" & vbCr
a = ThisDrawing.GetVariable("LASTPROMPT") 利用LASTPROMPT系统变量就可以得到最后一行的提示不知是否还有更好的办法?

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