Funzione MsgBox
Si applica a
In un database di Access per desktop la funzione MsgBox visualizza un messaggio in una finestra di dialogo, attende che l'utente faccia clic su un pulsante e restituisce un valore Integer che indica il pulsante su cui ha fatto clic l'utente.
Sintassi
MsgBox(prompt [, pulsanti ] [, titolo ] [, fileguida ] [, contesto ] )
La sintassi della funzione MsgBox ha gli argomenti seguenti:
| Argomento | Descrizione |
|---|---|
| prompt | Obbligatorio. Espressione stringa visualizzata come messaggio nella finestra di dialogo. La lunghezza massima del prompt è di circa 1024 caratteri, a seconda della larghezza dei caratteri usati. Se prompt è costituito da più righe, è possibile separare le righe usando un carattere di ritorno a capo (Chr(13)), un carattere di linefeed (Chr(10)) o una combinazione di caratteri di ritorno a capo - linefeed (Chr(13) & Chr(10)) tra ogni riga. |
| pulsanti | Facoltativo. espressione numerica che rappresenta la somma dei valori che specificano il numero e il tipo di pulsanti da visualizzare, lo stile dell'icona da usare, l'identità del pulsante predefinito e la modalità della finestra di messaggio. Se viene omesso, il valore predefinito per i pulsanti è 0. |
| titolo | Facoltativo. Espressione stringa visualizzata sulla barra del titolo della finestra di dialogo. Se si omette titolo, il nome dell'applicazione viene inserito nella barra del titolo. |
| fileguida | Facoltativo. Espressione stringa che identifica il file della Guida da usare per fornire la Guida sensibile al contesto per la finestra di dialogo. Se viene fornito fileguida , deve essere fornito anche contesto . |
| contesto | Facoltativo. Espressione numerica che rappresenta il numero di contesto della Guida assegnato all'argomento della Guida appropriato dall'autore della Guida. Se viene fornito contesto , deve essere fornito anche fileguida . |
Impostazioni
Le impostazioni degli argomenti pulsantisono:
| Costante | Valore | Descrizione |
|---|---|---|
| vbOKOnly | 0 | Visualizza solo il pulsante OK. |
| vbOKCancel | 1 | Visualizza i pulsanti OK e Annulla. |
| vbAbortRetryIgnore | 2 | Visualizza i pulsanti Interrompi, Riprova e Ignora. |
| vbYesNoCancel | 3 | Visualizza i pulsanti Sì, No e Annulla. |
| vbYesNo | 4 | Visualizza i pulsanti Sì e No. |
| vbRetryCancel | 5 | Visualizza i pulsanti Riprova e Annulla. |
| vbCritical | 16 | Visualizza l'icona di messaggio critico. |
| vbQuestion | 32 | Visualizza l'icona Query di avviso . |
| vbExclamation | 48 | Visualizza l'icona Messaggio di avviso . |
| vbInformation | 64 | Visualizza l'icona di messaggio informativo. |
| vbDefaultButton1 | 0 | Il primo pulsante è il predefinito. |
| vbDefaultButton2 | 256 | Il secondo pulsante è il predefinito. |
| vbDefaultButton3 | 512 | Il terzo pulsante è il predefinito. |
| vbDefaultButton4 | 768 | Il quarto pulsante è il predefinito. |
| vbApplicationModal | 0 | Finestra modale dell'applicazione. L'utente deve rispondere alla finestra di messaggio prima di continuare a lavorare nell'applicazione corrente. |
| vbSystemModal | 4096 | Finestra modale di sistema. Tutte le applicazioni vengono sospese finché l'utente non risponde alla finestra di messaggio. |
| vbMsgBoxHelpButton | 16384 | Aggiunge il pulsante ? alla finestra di messaggio |
| VbMsgBoxSetForeground | 65536 | Specifica la finestra di messaggio come finestra in primo piano |
| vbMsgBoxRight | 524288 | Il testo è allineato a destra |
| vbMsgBoxRtlReading | 1048576 | Specifica che il testo deve essere visualizzato con ordine di lettura da destra a sinistra nei sistemi ebraici e arabi |
Il primo gruppo di valori (0-5) descrive il numero e il tipo dei pulsanti visualizzati nella finestra di dialogo, il secondo gruppo (16, 32, 48, 64) descrive lo stile dell'icona, il terzo gruppo (0, 256, 512) determina quale pulsante è il predefinito e il quarto gruppo (0, 4096) determina la modalità della finestra di messaggio. Quando si aggiungono numeri per creare un valore finale per l'argomento pulsanti , usare un solo numero per ogni gruppo.
Nota
Queste costanti vengono specificate da Visual Basic, Applications Edition. Di conseguenza, i nomi possono essere usati in un punto qualsiasi del codice al posto dei valori effettivi.
Valori restituiti
| Costante | Valore | Descrizione |
|---|---|---|
| vbOK | 1 | OK |
| vbCancel | 2 | Annulla |
| vbAbort | 3 | Interrompi |
| vbRetry | 4 | Riprova |
| vbIgnore | 5 | Ignora |
| vbYes | 6 | Sì |
| vbNo | 7 | No |
Osservazioni
Quando vengono forniti sia fileguida che contesto , l'utente può premere F1 (Windows) o GUIDA (macOS) per visualizzare l'argomento della Guida corrispondente al contesto. Alcune applicazioni host, come Microsoft Excel, aggiungono anche automaticamente un pulsante ? alla finestra di dialogo.
Se la finestra di dialogo visualizza un pulsante Annulla, premendo ESC si ottiene lo stesso effetto di quando si fa clic su Annulla. Se la finestra di dialogo contiene un pulsante ?, per la finestra di dialogo viene fornita la Guida sensibile al contesto. Tuttavia, non viene restituito alcun valore fino a quando non si fa clic su uno degli altri pulsanti.
Nota
Per specificare più argomenti denominati oltre al primo, è necessario usare MsgBox in un'espressione. Per omettere alcuni argomenti posizionali, è necessario includere il delimitatore virgola corrispondente.
Esempio
Nota
Gli esempi seguenti illustrano l'uso di questa funzione in un modulo di Visual Basic, Applications Edition (VBA).
Questo esempio usa la funzione MsgBox per visualizzare un messaggio di errore critico in una finestra di dialogo con pulsanti Sì e No. Il pulsante No è specificato come risposta predefinita. Il valore restituito dalla funzione MsgBox dipende dal pulsante scelto dall'utente. Questo esempio presuppone che DEMO.HLP si tratti di un file della Guida che contiene un argomento con un numero di contesto della Guida uguale a 1000.
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "MsgBox Demonstration"
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then ' User chose Yes.
MyString = "Yes" ' Perform some action.
Else ' User chose No.
MyString = "No" ' Perform some action.
End If