Closing Dialog Screen

I have created my own MsgBox Class but when I close it and capture the return value the application seems to flash..... anyone know why?

I call it like this:

Code:

---

Public Function Message(Optional ByVal strMess As String = "", _
                            Optional ByVal MessType As MsgBoxStyle = MsgBoxStyle.OKOnly, _
                            Optional ByVal strHeading As String = "") _
                                    As DialogResult

        Dim MyBossMessage As New BOSSmessage(strMess, MessType, strHeading)
        Dim iReturn As DialogResult
        MyBossMessage.ShowDialog()

        ' Will wait here now until this Modal Dialog Box closes.
        iReturn = MyBossMessage.DialogResult

        MyBossMessage = Nothing

        Return iReturn

    End Function


Its a TopMost FixedDialog form Class.

---

have you tried...

Code:

---

Public Function Message(Optional ByVal strMess As String = "", _
                            Optional ByVal MessType As MsgBoxStyle = MsgBoxStyle.OKOnly, _
                            Optional ByVal strHeading As String = "") _
                                    As DialogResult

return (New BOSSmessage(strMess, MessType, strHeading)).ShowDialog()

End Function

---