Make your own free website on Tripod.com
Volver a Ejercicios parte 2 ir al índice ir a ejercicios - parte 3
Los cuadros de mensaje muestran un texto dentro de una ventana. Podemos usarlo mediante un código muy simple:
MsgBox ("texto a mostrar")

Podemos hacer más complejo el cuadro de mensaje. Tenemos las siguientes opciones:

  • Mensaje en sí
  • Ícono
  • Botones y botón que aparece seleccionado por defecto
  • Título
    Veamos un ejemplo:
MsgBox("Mensaje a mostrar", Ícono + Botones + Botón por defecto, "Título")
En el siguiente ejemplo usaremos una variable que hemos denominado "R". De acuerdo al botón que presione el usuario esta variable podrá ser: VbAbort, VbCancel, VbIgnore, VbNo, VbYes, VbOK o VbRetray.
VbDefaultButton1
VbDefaultButton2
VbDefaultButton3

Dibujo que se mostrará a la izquierda del mensaje, pudiendo usarse:
VbCritical
VbInformation
VbQuestion
VbExclamation

VbOKOnly
VbOKCancel
VbRetryCancel
VbYesNo
VbYesNoCancel
VbRetry
VbIgnore
Private Sub Command1_Click()
r = MsgBox("¿Finalizar aplicación?", vbYesNo + vbExclamation + vbDefaultButton2, "¡Atención!")
If r = vbYes Then
End
'Si r = vbYes quiere decir si el ususario hace click en el botón Yes, solo en ese caso End - finalizar.
End If
End Sub
Veamos algunos ejercicios:
Volver arriba Volver a Ejercicios parte 2 ir al índice ir a ejercicios - parte 3