[原创]Vlisp动态创建VBA窗体

yyzhan12

Vlisp动态创建VBA窗体，VBA窗体的创建完全由Vlisp代码完成，不需要加载或创建VBA工程

 

yyzhan12

 

nonsmall

提供动态接口给Lisp调用（生成+控制+数据获取）

我提供一份程序源码 有兴趣的朋友可以看看

yyzhan12

动态调用，工作量相对要小很多，灵活性较好，但要结合VBA的属性、方法，与Vlisp配合使用，通用函数已经初步实现，但不够傻瓜化，有待改善

yyzhan12

yyzhan12

不太会论坛的上传图片功能

yyzhan12

不死猫

只作为娱乐性的研究还可以

实用的话是没办法了

因为lisp用户实在不好把握每个控件的位置和大小

设计的难度要高于DCL编码

还必须懂VBA 因为里面的触发函数都要自己写....

yyzhan12

既然是动态创建VBA窗体,前提条件肯定是会用VBA

DCL设计也要确定每个控件的位置和大小,同样也要写触发函数,先写DCL文件,加载,删除文件

动态VBA窗体属性可以先在VBA中设计好窗体,各属性的取值也就轻而易举了,

还有一点,通过VLISP也可以玩转VBA

nonsmall

这样仅是等同于把DVB装进Lisp里面，而且VBA代码没有安全性。

还是用(Vlax-Get (Vlax-Get-Acad-Object) 'VBE)进行的操作。

(command "vbanew")

(Vlax-Invoke-Method (Vlax-Get (Vlax-Get (Vlax-Invoke-Method (Vlax-Get (Vlax-Invoke-Method (Vlax-Get (Vlax-Get (Vlax-Get-Acad-Object) 'VBE) 'VBProjects) 'item 1) 'VBComponents) 'item 3) 'Designer) 'Controls) 'Add "forms.CommandButton.1" )

(command "vbaide")

如果能用VB做动态链接库，提供类似CAD那样的对象模型，

封装VB窗体的创建、操作、事件等功能

让Lisp通过接口调用，就能够让Lisp开发者更容易接受。