求一个ActiveX Dll 相关做法
本帖最后由 sun485916 于 2010-04-29 10:24:24 编辑 我写金蝶的插件 生成 ActiveX Dll 里面包含了两个form.
现在的情况是 有好多个 Dll插件 都用到了 这两个form.
维护起来很麻烦
想把这两个form 单独做成一个 Dll

form中需要传入 参数,并且有返回多个值

不晓得如何编写这个共通dll
或者有好的解决方法
[解决办法]

Private Sub Form_Load()
Dim aaa As String
aaa = Test(Form1)
msgbox aaa
End Sub
Public Function Test(formname As VB.Form) As String
Text = "AAA"
End Function

[解决办法]
补充下
这两个form 无非是一些表格,文本框等控件,是查找修改数据库等其他功能

现在要传进去一个 string 数据库连接字符串

然后退出时候 需要返回我选择的多个数据
[解决办法]
一时想不出啥建议,注意显示别的工程中的窗体时,把焦点控制好,别让用户切换窗体感觉困惑吧.比如有些人求编码简单,尽量用模态方式显示
[解决办法]
有什么帮助的啊

谢谢了
[解决办法]



帮忙帮忙
[解决办法]
可以尝试这样:
1 新建一个ActiveX DLL工程
2 修改默认的工程的名称
3 修改默认的Class1的名称,并在其中添加一个Show函数,此函数的参数为输入参数,用ByRef参数来定义输出参数.如:

sub Show(byval input as string,byref output1 as variant, byref output2 as variant)
end sub

4 将窗体添加到新建的工程,并在Show函数中显示这两个窗体
5 编译工程


[解决办法]
给这个窗体定义一些属性，比如connstring之类的。

多个参数可以保存在结构体内返回。