activate window (this.name) in (_screen.activeform.name) >
dim parentForm As Form = Form.ActiveForm Me.MdiParent = parentForm