主题：把系统的错误提示屏蔽掉怎么写代码？

Dim r As WinForm.ListViewRow = e.Sender.Current
If Forms(r.text) IsNot Nothing
    Forms(r.text).show
Else
    MessageBox.show("项目建设中,敬请期待!","提示!",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If

当窗口不存在的时候，我就用我的提示，不想跳出系统的不存在窗口名为 XX的窗口，用return和e.cancel都不行

Dim r As WinForm.ListViewRow = e.Sender.Current
If Forms.Contains(r.text)

    Forms(r.text).show
Else
    MessageBox.show("项目建设中,敬请期待!","提示!",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If