программно создать форму

[td]

Как программно создать форму, которая соответвовала бы изначальной, но была бы самостоятельной? Скажем, массив одинаковых, но при этом независимых форм? Такое возможно?

[Firestorm]

это скорее получается запуск копии программы

[xfolder]

Dim newfrm As Form

Set newfrm = New Form1 ' Имя реальной формы из проекта
Load newfrm
newfrm.Caption = "New form"
newfrm.Show