Code:
Private Sub btnOKfrmTieSelection_Click(sender As Object, e As EventArgs) Handles btnOKfrmTieSelection.Click
frmTieDataInput.Show()
Me.Close()
End Sub
Private Sub btnOKfrmTieSelection_Click(sender As Object, e As EventArgs) Handles btnOKfrmTieSelection.Click
frmTieDataInput.Show()
Me.Close()
End Sub