How to overload a built-in vb.net function - vb.net

Question

I want to overload the built in MsgBox() function in VB.Net.
I want to add a beep every time a MsgBox pops up, but would rather not make a new function, e.g., MsgBoxWithBeep(), and do a whole bunch of find/replace in my existing code.
I can do this just fine within a module:
Public Sub MsgBox(msg As String)
Beep()
MsgBox(msg)
End Sub
But of course this ends up being an endless recursive loop.
I can't do MyBase.MsgBox() because this is not a class.
Is there an assumed class that all built-in function use like so I can do something like VbNetBaseClass.MsgBox() or some other way to get back to the original function?.

Answer 1

A simple solution would be to just use MsgBox to call MessageBox.Show like this:
Public Sub MsgBox(msg As String)
Beep()
MessageBox.Show(msg, Me.Text, MessageBoxButtons.OK)
End Sub
Or better yet, use the exclamation/error icons that already make a beep:
Public Sub MsgBox(msg As String)
MessageBox.Show(msg, Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Error)
End Sub
_
Edit: good point from blackwood...you can make it into a function if you need the result:
Public Function MsgBox(msg As String, _
Optional title As String = "", _
Optional msgButtons As MessageBoxButtons = MessageBoxButtons.OK, _
Optional msgIcon As MessageBoxIcon = MessageBoxIcon.None) _
As System.Windows.Forms.DialogResult
Return MessageBox.Show(msg, title, msgButtons, msgIcon)
End Function

Answer 2

I don't believe that you'll be able to override or overload the MsgBox() method as it is static and a standard module (as opposed to a class) as seen here within the source :
[StandardModule]
public sealed class Interaction
{
/* Other methods omitted for brevity */
public static MsgBoxResult MsgBox(object Prompt, MsgBoxStyle Buttons = MsgBoxStyle.ApplicationModal, object Title = null);
}
Your best bet is going to be to write your own method or wrapper to handle calling it with your optional overloads, etc.