一种思路，可望替代DCL：lisp控制VBA窗体

陨落

曾经nonsmall大侠发过一篇关于Lisp控制VBA窗体的文章http://bbs.mjtd.com/forum.php?mod=viewthread&tid=73266，莫测高深,拜读之后仍然是疑云重重，后来又看到革天明的这篇文章http://bbs.mjtd.com/thread-92370-1-1.html，有一篇文献里面给出了一个非常简单的思路，想必论坛上很多人都已经用过了，但是还没有看到过明显实践的例子，最近稍微学了一点点VBA，把我自己的钻研结果贴出来，谬误难免，欢迎大家指摘。
是一个画矩形的程序，勾上“中心”就以中心点为基点画，否则以左上角点为基点。运行时把lisp和dvb放在一个目录下，加载lisp，输入命令cf即可运行
核心思路代码：
VBA部分：

1. ThisDrawing.SendCommand "(zx " & " " & cd & " " & kd & ")" & " "

复制代码

lisp部分：

2. (vl-vbaload (strcat lisdirec "画矩形.dvb"))
   
3.   (command "vbarun" "hjx")

(vl-vbaload (strcat lisdirec "画矩形.dvb"))<br />   (command "vbarun" "hjx")

陨落

lisp中借鉴了xiaoyingzi在http://bbs.mjtd.com/forum.php?mod=viewthread&tid=96075中的高论，在此致谢！

mccad

以前有人变量信息存储在系统变量中，也可以把变量存储在注册表中去，或存储成临时的文本配置文件中。
关键就是怎样进行数据的传递。
你的程序，直接在VBA中调用sendcommand来执行，不太赞成这种做法，因为VBA使用SendCommand时会存在不同步的问题，有时会使程序运行时出些奇怪的问题。
不过，你的程序因为将SendCommand放在了VBA程序的最后面，倒不存在执行顺序上的问题。

Gu_xl

现在VBA已经被桌子公司抛弃，所以研究这个似乎没有太大意义！要想使用更强大的DCL，建议使用OpenDcl来开发对话框！

陨落

mccad 发表于 2013-6-3 13:06
以前有人变量信息存储在系统变量中，也可以把变量存储在注册表中去，或存储成临时的文本配置文件中。
关键 ...

学习了！也谢谢您的意见，还是大侠见多识广！

陨落

Gu_xl 发表于 2013-6-3 13:25
现在VBA已经被桌子公司抛弃，所以研究这个似乎没有太大意义！要想使用更强大的DCL，建议使用OpenDcl来开发对 ...

嗯，确实感觉VBA除了做对话框，其它很少有能比得上lisp的，也正在研究Opendcl中！

陨落

陨落

jacksplwxy