Dim frm2 as New Form2
frm2.Show()