MessageBoxButtons with other words 2

[RSilva]

Hello
I want create 1 Box that show 3 buttons with "1", "2" and "a"
I found this comand MessageBoxButtons like this exemple:

result = MessageBox.Show("Choose 1 option", "", MessageBoxButtons.YesNoCancel)

there are any way to change "yes", "no" and "cancel" for "1", "2" and "a"?

Rúben Silva

 

[cowski]

No, the message box function has a few, very specific options. If you would like something outside of these options, you will need to make a custom messagebox (using a winform or the NX blockstyler).

www.nxjournaling.com

 

[daluigi]

Function AskMsg(ByVal title As String, ByVal message As String) As Boolean
Dim messages As String() = {message}
Dim buttons As UFUi.MessageButtons
With buttons
.button1 = True
.button2 = False
.button3 = True
.label1 = "Yes"
.label2 = Nothing
.label3 = "No"
.response1 = 1
.response2 = 0
.response3 = 2
End With
Dim resp As Integer

theUFSession.Ui.LockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)
theUFSession.Ui.MessageDialog(title, UiMessageDialogType.UiMessageQuestion, messages, 1, True, buttons, resp)
theUFSession.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)

If resp = 1 Then Return True Else Return False
End Function

 

[RSilva]

Realy Thank you for your help

 

[RSilva]

By the way Daluigi, you saved my day

 

[cowski]

Good stuff, a star for daluigi.

www.nxjournaling.com