Not to difficult, here's how you do it. Add the following to a form with a command button clicking the command button with create a new copy of form1 and display it.
Code:Private Sub Command1_Click() Dim frm As Form Set frm = New Form1 frm.Caption = "Hello World" frm.Show End Sub




Reply With Quote