<font color=brown>
最近着手编写某一个大型工具软件,需要用VB动态复制某一窗体,顺手baidu了一下,五花八门的答案,经过实验
找到一种比较靠谱的:
A、建立一个module,并在其中添加一个窗体数组,例如
public formArray(0 to 2) as frmExample
public formCount as intager
B、在某一个位置,添加如下代码
set formArray(下标) as new frmExample
load formArray(<下标>)
就可以动态的复制窗体frmExample了
C、通过数组formArray()就可以在任意位置访问这些新添加的窗体。
使用这种方法有一个缺点:允许添加的动态窗体数量是有限的,由于全局变量不允许用redim,所以,通过redim的企图
是无效的……如果你真的想突破这种限制……借助某些dll吧……原理就是利用C语言来修改SafeArray,动态分配空间给
全局数组……dll + VB果然是小原子弹啊……
|