Módulo
Contenido
Índice 🔎︎

# Función MsgBox

Muestra un cuadro de diálogo que contiene un mensaje y devuelve un valor.

## Sintaxis:

    MsgBox (Texto As String [,Tipo As Integer [,TítuloDiálogo As String]])

## Valor de retorno:

Entero

## Parámetros:

Texto: Expresión de cadena que se muestra como mensaje en el cuadro de diálogo. Se pueden insertar saltos de línea con Chr$(13).

TítuloDiálogo: Expresión de cadena que se muestra en la barra de título del diálogo. Si se omite, se muestra el nombre de la aplicación correspondiente.

Tipo: Cualquier expresión entera que especifique el tipo de diálogo y defina el número y tipo de botones o iconos que se muestran. Tipo representa una combinación de patrones de bits (los elementos del diálogo se definen al añadir los valores correspondientes):

Valores

Constante con nombre | Valor entero | Definición
MB_OK | 0 | Mostrar solo el botón «Aceptar».
MB_OKCANCEL | 1 | Mostrar los botones «Aceptar» y «Cancelar».
MB_ABORTRETRYCANCEL | 2 | Mostrar los botones «Interrumpir», «Reintentar» e «Ignorar».
MB_YESNOCANCEL | 3 | Mostrar los botones «Sí», «No» y «Cancelar».
MB_YESNO | 4 | Mostrar los botones «Sí» y «No».
MB_RETRYCANCEL | 5 | Mostrar los botones «Reintentar» y «Cancelar».
MB_ICONSTOP | 16 | Añadir el icono de parada crítica al cuadro de diálogo.
MB_ICONQUESTION | 32 | Añadir el icono de pregunta al cuadro de diálogo.
MB_ICONEXCLAMATION | 48 | Añadir el icono del signo de exclamación al cuadro de diálogo.
MB_ICONINFORMATION | 64 | Añade el icono de información al cuadro de diálogo.
| 128 | El primer botón del cuadro de diálogo es el predeterminado.
MB_DEFBUTTON2 | 256 | El segundo botón del cuadro de diálogo es el predeterminado.
MB_DEFBUTTON3 | 512 | El tercer botón del cuadro de diálogo es el predeterminado.

Valor de retorno:

Constante con nombre | Valor entero | Definición
IDOK | 1 | Aceptar
IDCANCEL | 2 | Cancelar
IDABORT | 3 | Interrumpir
IDRETRY | 4 | Reintentar
IDIGNORE | 5 | Ignorar
IDYES | 6 | Sí
IDNO | 7 | No

## Códigos de error:

5 Llamada a procedimiento no válida

## Ejemplo:

    Sub ExampleMsgBox
    Dim sVar As Integer
     sVar = MsgBox("Acaxochitlán")
     sVar = MsgBox("Acaxochitlán",1)
     sVar = MsgBox( "Acaxochitlán",256 + 16 + 2,"Título del cuadro de diálogo")
     sVar = MsgBox("Acaxochitlán", MB_DEFBUTTON2 + MB_ICONSTOP + MB_ABORTRETRYCANCEL, "Título del cuadro de diálogo")
    End Sub