[Erel]

You can use the following code to set the position of the next form:

Sub App_Start
    Form1.Show
End Sub


Sub Button1_Click
    form2.Show
    form2.Left = form1.Left
    form2.Top = form1.Top
End Sub