Funcția MsgBox

Se aplică la
Access pentru Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Într-o bază de date desktop Access, funcția MsgBox afișează un mesaj într-o casetă de dialog, așteaptă ca utilizatorul să facă clic pe un buton și returnează un număr întreg care indică butonul pe care a făcut clic utilizatorul.

Sintaxă

MsgBox(prompt [, buttons ] [, title ] [, helpfile ] [, context ] )

Sintaxa funcției MsgBox are următoarele argumente:

Argument Descriere
Prompt Obligatoriu. Expresie șir afișată ca mesaj în caseta de dialog. Lungimea maximă a solicitării este de aproximativ 1024 de caractere, în funcție de lățimea caracterelor utilizate. Dacă solicitarea constă din mai multe linii, puteți separa liniile utilizând un caracter sfârșit de linie (Chr(13)), un caracter flux de linie (Chr(10)) sau sfârșit de linie - combinație de caractere flux de linie (Chr(13) & Chr(10)) între fiecare linie.
Butoane Opțional. expresie numerică care este suma valorilor care specifică numărul și tipul de butoane de afișat, stilul de pictogramă de utilizat, identitatea butonului implicit și modalitatea casetei de mesaj. Dacă este omisă, valoarea implicită pentru butoane este 0.
Titlu Opțional. Expresie șir afișată în bara de titlu a casetei de dialog. Dacă omiteți titlul, numele aplicației este plasat în bara de titlu.
helpfile Opțional. Expresie șir care identifică fișierul Ajutor de utilizat pentru a furniza Ajutor contextual pentru caseta de dialog. Dacă este furnizat helpfile , trebuie furnizat și contextul .
Contextul Opțional. Expresie numerică care este numărul de context Ajutor atribuit subiectului de Ajutor corespunzător de autorul Ajutorului. Dacă este furnizat contextul , trebuie furnizat și helpfile .

Setări

Setările argumentelor butoanelorsunt:

Constantă Valoare Descriere
vbOKOnly 0 Afișați doar butonul OK .
vbOKAnulare 1 Afișați butoanele OK și Anulare .
vbAbortRetryIgnore 2 Afișare butoane abandonare, Reîncercare și Ignorare .
vbYesNoCancel 3 Se afișează butoanele Da, Nu și Anulare .
vbYesNo 4 Afișați butoanele Da și Nu .
vbRetryCancel 5 Afișare butoanele Reîncercare și Anulare .
vbCritical 16 Pictograma Afișare mesaj critic .
vbQuestion 32 Pictograma Afișare interogare de avertizare.
vbExclamation 48 Afișare pictogramă Mesaj de avertizare .
vbInformation 64 Pictograma Afișare mesaj informații .
vbDefaultButton1 0 Primul buton este implicit.
vbDefaultButton2 256 Al doilea buton este implicit.
vbDefaultButton3 512 Al treilea buton este implicit.
vbDefaultButton4 768 Al patrulea buton este implicit.
vbApplicationModal 0 Mod de aplicare; utilizatorul trebuie să răspundă la caseta mesajului înainte de a continua lucrul în aplicația curentă.
vbSystemModal 4096 Modal sistem; toate aplicațiile sunt suspendate până când utilizatorul răspunde la caseta de mesaj.
vbMsgBoxHelpButton 16384 Adaugă butonul Ajutor în caseta de mesaj
VbMsgBoxSetForeground 65536 Specifică fereastra casetei de mesaj ca fereastră de prim plan
vbMsgBoxRight 524288 Textul este aliniat la dreapta
vbMsgBoxRtlReading 1048576 Specifică faptul că textul ar trebui să apară ca citire de la dreapta la stânga pe sistemele ebraică și arabă

Primul grup de valori (0-5) descrie numărul și tipul de butoane afișate în caseta de dialog; al doilea grup (16, 32, 48, 64) descrie stilul de pictogramă; al treilea grup (0, 256, 512) determină butonul implicit; și al patrulea grup (0, 4096) determină modalitatea casetei de mesaj. Atunci când adăugați numere pentru a crea o valoare finală pentru argumentul butoane , utilizați un singur număr din fiecare grup.

Notă

Aceste constante sunt specificate de Visual Basic for Applications. Prin urmare, numele pot fi utilizate oriunde în codul dvs. în locul valorilor reale.

Valori returnate

Constantă Valoare Descriere
vbOK 1 OK
vbCancel 2 Anulare
vbAbort 3 Abandona
vbRetry 4 Reîncercare
vbIgnore 5 Ignora
vbYes 6 Da
vbNo 7 Nu

Observații

Atunci când sunt furnizate atât helpfile , cât și contextul , utilizatorul poate apăsa F1 (Windows) sau HELP (macOS) pentru a vedea subiectul de Ajutor corespunzător contextului. Unele aplicații gazdă, de exemplu, Microsoft Excel, adaugă automat un buton Ajutor în caseta de dialog.

În cazul în care caseta de dialog afișează un buton Anulare , apăsarea tastei ESC are același efect ca și cum ați face clic pe Anulare. În cazul în care caseta de dialog conține un buton Ajutor , se furnizează Ajutor dependent de context pentru caseta de dialog. Totuși, nu este returnată nicio valoare până când nu se face clic pe unul dintre celelalte butoane.

Notă

Pentru a specifica mai mult decât primul argument denumit, trebuie să utilizați Caseta Msg într-o expresie. Pentru a omite unele argumente poziționale, trebuie să includeți delimitatorul de virgulă corespunzător.

Exemplu

Notă

Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA).

Acest exemplu utilizează funcția MsgBox pentru a afișa un mesaj de eroare critică într-o casetă de dialog cu butoanele Da și Nu. Butonul Nu este specificat ca răspuns implicit. Valoarea returnată de funcția MsgBox depinde de butonul ales de utilizator. Acest exemplu presupune că DEMO.HLP este un fișier Ajutor care conține un subiect cu un număr contextual de Ajutor egal cu 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