Como añadir un boton personalizado en MsgBoxResult

Question

Como añadir un boton personalizado en MsgBoxResult a los botones ya esistentes Aceptar y Cancelar

Gracias

 

Dim Copia_de_Seguridad As MsgBoxResult = MsgBox("¿Desea continuar con la copia de seguridad?, se creara el archivo " & DataGridView1.CurrentRow.Cells(1).Value & "_" & fecha & ".Xml desea crear el archivo", vbOKCancel, "CONFIRMACION")
        If Copia_de_Seguridad = vbOK Then
end if

Answer 1

Supongo que te refieres a añadir un nuevo botón al control MsgBox. Este control permite un máximo de 3 botones. (Si, No, Cancelar  ó Abortar, Reintentar o Ignorar) mediante el parámetro Buttons.

Si lo que quieres es algún tipo de botón especial con otro título tendrás que crearte tu propio formulario de mensaje.

---

Saludos, Javier J

Answer 2

https://github.com/tchadwick/CustomMessageBox

http://www.codeproject.com/Articles/18399/Localizing-System-MessageBox

https://github.com/nawarhalabi/ArabicAccessibilityToolbar/blob/master/MessageBoxManager/MessageBoxManager.cs

La opción de Javier es la más correcta, te haces un formulario con sus botones, les das funcionalidad con sus events y todo personalizado.

Aunque con los standar te deberia de sobrar:

https://msdn.microsoft.com/en-us/library/139z2azd%28v=vs.90%29.aspx

Answer 3

E preguntado por que no sabia si se podia o no gracias a todos