ARTICLE
Localizable Message Box Control using VB.NET
This is localizable MessageBox control. Buttons on standard windows message box controls are always Yes, No, Abort, Cancel, OK, Ignore, Retry. I needed different text on my message boxes so I decided to develop custom message box control.
Download
Files:
My control is useful for every project. This is localizable MessageBox control. Buttons on standard windows message box controls are always Yes, No, Abort, Cancel, OK, Ignore, Retry. I needed different text on my message boxes so I decided to develop custom message box control. I wrote one Test application just to show how it works. There are 10 predefined constructors.
5 classic like Windows.Forms.MessageBox.
- Public Shared Function Display(message As String, caption As String, buttons As MessageBoxButtons, icon As MessageBoxIcon, defaultButton As MessageBoxDefaultButton) As DialogResult
End Function 'Display
- Public Shared Function Display(message As String, caption As String, buttons As MessageBoxButtons, icon As MessageBoxIcon, defaultButton As MessageBoxDefaultButton) As DialogResult
End Function 'Display
- Public Shared Function Display(message As String, caption As String, buttons As MessageBoxButtons) As DialogResult
End Function 'Display
- Public Shared Function Display(message As String, caption As String) As DialogResult End Function 'Display
- Public Shared Function Display(message As String) As DialogResult
End Function 'Display
5 special with predefined text on buttons.
-
Public Shared Function DisplayLocal(message As String, caption As String, buttons As MessageBoxButtons, icon As MessageBoxIcon, defaultButton As MessageBoxDefaultButton, yesButtonText As String, noButtonText As String, abortButtonText As String) As DialogResult
End Function 'DisplayLocal
-
Public Shared Function DisplayLocal(message As String, caption As String, buttons As MessageBoxButtons, icon As MessageBoxIcon, yesButtonText As String, noButtonText As String, abortButtonText As String) As DialogResult End Function 'DisplayLocal
-
Public Shared Function DisplayLocal(message As String, caption As String, buttons As MessageBoxButtons, yesButtonText As String, noButtonText As String, abortButtonText As String) As DialogResult
End Function 'DisplayLocal
-
Public Shared Function DisplayLocal(message As String, caption As String, yesButtonText As String) As DialogResult
End Function 'DisplayLocal
-
Public Shared Function DisplayLocal(message As String, yesButtonText As String) As DialogResult
End Function 'DisplayLocal
Default text is Serbian Da=Yes, Ne=No and Odustani=Abort.
Dialog result is on of the following:
- Yes
- No
- Cancel
There is no DialogResult.OK, DialogResult.OK, DialogResult.Retry.
You can
- Have maximum 3 buttons
- Choose one of four Icons (Error, Information, Warning, Question, No icon)
- Set default button
- Set text for each button
Here are some screen shots to take a look at:
Example 1:

Example 2:

NOTE: THIS ARTICLE IS CONVERTED FROM C# TO VB.NET USING A CONVERSION TOOL. ORIGINAL ARTICLE CAN BE FOUND ON C# CORNER (WWW.C-SHARPCORNER.COM).