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

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

用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" &amp; vbCr<BR>a = ThisDrawing.GetVariable("LASTPROMPT")


利用LASTPROMPT系统变量就可以得到最后一行的提示


不知是否还有更好的办法?
页: [1]
查看完整版本: 用VBA如何才能取得由LISP加载的变量?