用vb写的lisp转vba小程序~方便vba调用lisp

tekken918 · 发表于 2010-12-23 21:06:00

发现手工将lisp代码转换成vba时候很容易眼花，把空格啊引号啥的都漏掉。调试很吃力。
于是编写这个小程序，水平很低，各位大侠温柔拍砖啊。
程序主要用于将lisp代码转换成ASCII码，便于直接复制到VBA代码中使用。
比如 (setq aa (abs  b * 23)) 转换后成为 chr(40)+chr(115)+chr(101)+chr(116)+chr(113)+chr(32)+chr(97)+chr(97)+chr(32)+chr(40)+chr(97)+chr(98)+chr(115)+chr(32)+chr(32)+chr(98)+chr(32)+chr(42)+chr(32)+chr(50)+chr(51)+chr(41)+chr(41)
这也许看起来很长不直观  但是可以把想 sendcommand 的内容先带入  msgbox 如果确认一下。
代码超长的情况  比如打印设置或插入块一类的命令  可以吧生成的代码截断，赋值给string。之后sendcommand的时候再叠加就可以。
当然带入VBA值进入lisp时，正好将前后部分断开。比较直观。

0j5ggb5gkwg.JPG

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复