Într-o bază de date desktop Access, funcția MsgBox afișează un mesaj într-o casetă de dialog, așteaptă ca utilizatorul să selecteze un buton și returnează un Integer buton care indică ce buton a selectat utilizatorul.
Sintaxă
MsgBox(prompt[, buttons][, title][, helpfile][, context])
MsgBox Sintaxa funcției are următoarele argumente:
| Argument | Descriere |
|---|---|
prompt |
Obligatoriu. Expresie șir afișată ca mesaj în caseta de dialog. Lungimea maximă este de aproximativ 1024 de prompt caractere, în funcție de lățimea caracterelor utilizate. Dacă prompt există 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 o combinație de sfârșit de linie (Chr(13) & Chr(10)) între fiecare linie. |
buttons |
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 buttons este 0. |
title |
Opțional. Expresie șir afișată în bara de titlu a casetei de dialog. Dacă omiteți title, numele aplicației apare în bara de titlu. |
helpfile |
Opțional. Expresie șir care identifică fișierul de ajutor de utilizat pentru a furniza ajutor dependent de context pentru caseta de dialog. Dacă helpfile este furnizat, context trebuie să fie furnizat și el. |
context |
Opțional. Expresie numerică care este numărul contextului de ajutor atribuit subiectului de ajutor corespunzător de către autorul ajutorului. Dacă context este furnizat, helpfile trebuie să fie furnizat și el. |
Setări
Setările argumentelor buttons sunt:
| Constantă | Value | Descriere |
|---|---|---|
vbOKOnly |
0 |
Doar afișaj OK . |
vbOKCancel |
1 |
Afișați OK și Anulare. |
vbAbortRetryIgnore |
2 |
Abandonarea afișării, Reîncercați și Ignorare. |
vbYesNoCancel |
3 |
Afișați Da, Nu și Anulați. |
vbYesNo |
4 |
Afișați Da și Nu. |
vbRetryCancel |
5 |
Afișați, reîncercați și anulați. |
vbCritical |
16 |
Afișarea pictogramei Mesaj critic . |
vbQuestion |
32 |
Afișează pictograma Interogare de avertizare. |
vbExclamation |
48 |
Afișarea pictogramei Mesaj de avertizare. |
vbInformation |
64 |
Afișarea pictogramei Mesaj de informare. |
vbDefaultButton1 |
0 |
Faceți primul buton implicit. |
vbDefaultButton2 |
256 |
Faceți ca al doilea buton să fie implicit. |
vbDefaultButton3 |
512 |
Faceți ca al treilea buton să fie implicit. |
vbDefaultButton4 |
768 |
Faceți ca al patrulea buton să fie implicit. |
vbApplicationModal |
0 |
Modală de aplicație. Utilizatorul trebuie să răspundă la caseta de mesaj înainte de a continua lucrul în aplicația curentă. |
vbSystemModal |
4096 |
Modală de sistem. Toate aplicațiile sunt suspendate până când utilizatorul răspunde la caseta de mesaj. |
vbMsgBoxHelpButton |
16384 |
Adăugați un buton Ajutor în caseta de mesaj. |
VbMsgBoxSetForeground |
65536 |
Specificați fereastra casetei de mesaj ca fereastră de prim plan. |
vbMsgBoxRight |
524288 |
Aliniați textul la dreapta. |
vbMsgBoxRtlReading |
1048576 |
Faceți ca textul să apară cu citirea de la dreapta la stânga în sistemele ebraică și arabă. |
Primul grup de valori (0 până la 5) descrie numărul și tipul de butoane afișate în caseta de dialog. Al doilea grup (16, 32, 48, 64) descrie stilul pictogramei. Al treilea grup (0, 256, 512) determină butonul implicit. Al patrulea grup (0, 4096) determină modalitatea casetei de mesaj. Când adunați numere pentru a crea o valoare finală pentru argument, buttons utilizați un singur număr din fiecare grup.
Notă
Aceste constante sunt specificate de Visual Basic for Applications. Prin urmare, puteți utiliza numele oriunde în cod în locul valorilor efective.
Valorile returnate
| Constantă | Value | Descriere |
|---|---|---|
vbOK |
1 |
OK |
vbCancel |
2 |
Anulare |
vbAbort |
3 |
Abandonare |
vbRetry |
4 |
Reîncercare |
vbIgnore |
5 |
Ignorare |
vbYes |
6 |
Da |
vbNo |
7 |
Nu |
Observații
Atunci când sunt furnizate ambele helpfile și context , utilizatorul poate apăsa F1 în Windows sau Ajutor în macOS pentru a vedea subiectul de Ajutor care se potrivește contextcu . Unele aplicații gazdă, cum ar fi 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 pe Esc are același efect ca selectarea Anulării. În cazul în care caseta de dialog conține un buton Ajutor , se oferă pentru caseta de dialog Ajutor dependent de context. Totuși, nu se returnează nicio valoare decât după ce utilizatorul selectează unul dintre celelalte butoane.
Notă
Pentru a specifica mai mult decât primul argument denumit, trebuie să utilizați într-o MsgBox expresie. Pentru a omite unele argumente poziționale, trebuie inclus delimitatorul de virgulă corespunzător.
Exemplu
Notă
Următorul exemplu demonstrează cum se utilizează această funcție într-un modul Visual Basic for Applications (VBA).
Acest exemplu utilizează funcția pentru a afișa un mesaj de eroare critică într-o MsgBox casetă de dialog cu butoanele Da și Nu . Butonul Nu este specificat ca răspuns implicit. Valoarea returnată de funcție MsgBox depinde de butonul pe care îl selectează utilizatorul. Acest exemplu presupune că DEMO.HLP este un fișier Ajutor care conține un subiect cu un număr de context 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