Programar msgbox los botones si no
Algún experto me puede decir como programar los botones de si y no de un msgbox,
Me estoy peleando para encontrar la solución pero no lo consigo.
1 Respuesta
Respuesta de Enrique Feijóo
Los botones se utilizan, pero no se manipulan se puede conocer que botón ha sido pulsado (como respuesta del MsgBox) y con cualquiera de las opciones de toma de decisiones (IF, Case ...) se actúa en consecuencia.
Un ejemplo básico con tres botones (o su nemotécnico: VbYesNoCancel <==> 3):
Private Sub Comando38_Click()
Dim rpt
rpt = MsgBox("dime algo", 3)
Select Case rpt
Case vbYes ' vbYes = 6
MsgBox "lo has confimado"
Case vbNo ' vbNo = 7
MsgBox "lo has rechazado"
Case vbCancel 'vbCancel = 2
MsgBox "te es indiferente"
End Select
End Sub
