Создание копии формы за один клик - VB

Формулировка задачи:

Надо что бы при нажатии кнопы создавалась копия формы со всеми размещенными на ней контролами и соответствующим им кодом... если можно то 2 варианта - так как может понадобится создавать копию формы (неодну) когда в ней уже работали и в ее полях, боксах, чеках - уже есть какая т оинфа - что бы форма создавалась копией с той что есть на текущий момент. а второй вариант - это просто создать копию формы с контролами и кодом, но в том виде в котором она до запуска - изначально...

Решение задачи: «Создание копии формы за один клик»

textual
                            Листинг программы 
                        

                            Dim Coll As New Collection, k As Long
Dim NewForm As Form1
 
Private Sub Command1_Click()
Set NewForm = New Form1
Coll.Add NewForm, 'Frm' & k
Coll('Frm' & k).Show
k = k + 1
End Sub
                        