Modulo
Contenuto
Indice 🔎︎

# Funzione MsgBox

Mostra un riquadro contenente un messaggio e restituisce un valore.

## Sintassi:

    MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]])

## Valore restituito:

Integer

## Parametro:

Text (Testo): stringa visualizzata come messaggio nella finestra di dialogo. Le interruzioni di riga possono essere inserite con Chr$(13).

DialogTitle (TitoloDialogo): stringa visualizzata nella barra del titolo della finestra di dialogo. Se questa stringa è omessa, viene visualizzato il nome dell'applicazione corrispondente.

Type (Tipo): espressione intera che specifica il tipo di finestra di dialogo e definisce il numero e il tipo dei pulsanti o delle icone visualizzate. Type rappresenta una combinazione di modelli di bit (elementi delle finestre di dialogo definiti sommando i rispettivi valori):

Valori

Costante con nome | Valore intero | Definizione
MB_OK | 0 | Visualizza solo il pulsante OK.
MB_OKCANCEL | 1 | Visualizza i pulsanti OK e Annulla.
MB_ABORTRETRYCANCEL | 2 | Visualizza i pulsanti Interrompi, Riprova e Ignora.
MB_YESNOCANCEL | 3 | Visualizza i pulsanti Sì, No e Annulla.
MB_YESNO | 4 | Visualizza i pulsanti Sì e No.
MB_RETRYCANCEL | 5 | Visualizza i pulsanti Riprova e Annulla.
MB_ICONSTOP | 16 | Aggiunge l'icona Arresta alla finestra di dialogo.
MB_ICONQUESTION | 32 | Aggiunge l'icona Domanda alla finestra di dialogo.
MB_ICONEXCLAMATION | 48 | Aggiunge l'icona Punto esclamativo alla finestra di dialogo.
MB_ICONINFORMATION | 64 | Aggiunge l'icona Informazione alla finestra di dialogo.
| 128 | Primo pulsante della finestra di dialogo come pulsante predefinito.
MB_DEFBUTTON2 | 256 | Secondo pulsante della finestra di dialogo come pulsante predefinito.
MB_DEFBUTTON3 | 512 | Terzo pulsante della finestra di dialogo come pulsante predefinito.

Valore restituito:

Costante con nome | Valore intero | Definizione
IDOK | 1 | OK
IDCANCEL | 2 | Annulla
IDABORT | 3 | Interrompi
IDRETRY | 4 | Riprova
IDIGNORE | 5 | Ignora
IDYES | 6 | Sì
IDNO | 7 | No

## Codici di errore:

5 Richiamo di procedura non valido

## Esempio:

    Sub ExampleMsgBox

    Dim sVar As Integer

     sVar = MsgBox("Milano")

     sVar = MsgBox("Milano",1)

     sVar = MsgBox( "Milano",256 + 16 + 2,"Titolo della finestra di dialogo")

     sVar = MsgBox("Milano", MB_DEFBUTTON2 + MB_ICONSTOP + MB_ABORTRETRYCANCEL, "Titolo della finestra di dialogo")

    End Sub