如何在程序运行中重复调用同一窗体（即在屏幕上同时显示几个相同的窗体）？

Question

假设你已经有了一个窗体 Form1 在代码中写如下：dim frmTest as new form1frmtest.show 
注意在程序退出的时候必须set frmtest=nothing 或者unload frmtest

Answer 1

定义动态窗体数组，把每个数组赋为窗体的新实例
dim aForm() as form1,i as integer
redim aForm(10) as form1
for i=0 to 10
    set aForm(i)=New form1
    aForm(i).Show
next i

Answer 2

如果是一个控件，如treeview，我想在另一个窗体中用，怎么用(完全相同)。

Answer 3

set TmpForm = New form1
set TmpTreeview=New Form1.Treeview