Dim m As Form = New Form
        Dim m2 As Form = New Form
        m2.Show()
        m.Location = New Point(Screen.AllScreens(0).WorkingArea.Left, Screen.AllScreens(0).WorkingArea.Top)
        m2.Location = New Point(Screen.AllScreens(1).Bounds.Left, Screen.AllScreens(1).Bounds.Top)