archlau 发表于 2002-10-26 11:20:00

auotlisp

SetQ MenuName '("CBX_C01" "中国习惯尺寸标注")
能不能把menuname变量的值给取出来
放到vb的变量里面去
也就是说lisp可以把它的数据传到其它的语言里面去吗?

南子 发表于 2002-10-26 22:38:00

简单的办法是利用user*变量。

lisp: (setvar "users1" "123")
vb:   thisdrawing.GetVariable("users1")
ex:(SetQ MenuName '("CBX_C01" "中国习惯尺寸标注") )
lisp:(setvar "users1" (car MenuName))
       (setvar "users2" (cadr MenuName))
vb:   dim MenuName(0 to 1) as string
      MenuName(0)=thisdrawing.getvariable("users1")
      MenuName(1)=thisdrawing.getvariable("users2")

archlau 发表于 2002-10-26 23:41:00

谢谢

我试一下,应该可以,因为我对lisp语言不是很了解,所以不知道user1变量是什么东西
不过我看了应该可以实现的.试试吧
太感谢了.
页: [1]
查看完整版本: auotlisp