"Access" darbalaukio duomenų bazėje funkcija MsgBox rodo pranešimą dialogo lange, laukia, kol vartotojas spustelės mygtuką, ir pateikia sveikąjį skaičių , nurodantį, kurį mygtuką vartotojas spustelėjo.
Sintaksė
MsgBox(raginimas [, mygtukai ] [, pavadinimas ] [, žinyno failas ] [, kontekstas ] )
Funkcijos MsgBox sintaksė turi tokius argumentus:
| Argumentas | Aprašas |
|---|---|
| raginimas | Būtinas. Eilutės išraiška, rodoma kaip pranešimas dialogo lange. Maksimalus raginimo ilgis yra maždaug 1024 simboliai, atsižvelgiant į naudojamų simbolių plotį. Jei raginimą sudaro daugiau nei viena eilutė, galite atskirti eilutes naudodami eilutės grįžimo simbolį (Chr(13)), eilutės pateikimo simbolį (Chr(10)) arba eilutės grįžimo-eilutės simbolių derinį (Chr(13) & Chr(10)) tarp kiekvienos eilutės. |
| mygtukai | Pasirinktinis. Skaitinis reiškinys, kuris yra reikšmių suma, nurodanti rodomų mygtukų skaičių ir tipą, naudotinos piktogramos stilių, numatytojo mygtuko tapatybę ir pranešimo lauko modalumą. Jei nenurodyta, numatytoji mygtukų reikšmė yra 0. |
| pavadinimas | Pasirinktinis. Eilutės išraiška, rodoma dialogo lango pavadinimo juostoje. Jei praleisite pavadinimą, programos pavadinimas bus įtrauktas į pavadinimo juostą. |
| žinyno failas | Pasirinktinis. Eilutės išraiška, identifikuojanti žinyno failą, naudotiną teikiant kontekstinį dialogo lango žinyną. Jei pateiktas žinyno failas , turi būti pateiktas kontekstas . |
| Kontekstas | Pasirinktinis. Skaitinis reiškinys, kuris yra žinyno konteksto numeris, kurį žinyno autorius priskyrė atitinkamai žinyno temai. Jei pateikiamas kontekstas , taip pat turi būti pateiktas žinyno failas . |
Parametrai
Mygtukųargumentų parametrai yra:
| Konstanta | Reikšmė | Aprašas |
|---|---|---|
| vbOKOnly | 0 | Rodyti tik mygtuką Gerai . |
| vbOKCancel | 1 | Rodyti mygtukus Gerai ir Atšaukti . |
| vbAbortRetryIgnore | 2 | Rodyti mygtukus Nutraukti, Kartoti ir Nepaisyti . |
| vbYesNoAtšaukti | 3 | Rodyti mygtukus Taip, Ne ir Atšaukti . |
| vbYesNe | 4 | Ekrano mygtukai Taip ir Ne . |
| vbRetryCancel | 5 | Rodyti pakartotinio bandymo ir atšaukimo mygtukus. |
| vbCritical | 16 | Rodyti kritinio pranešimo piktogramą. |
| vbKlausimas | 32 | Rodyti įspėjimo užklausos piktogramą. |
| vbExclamation | 48 | Rodyti įspėjimo pranešimo piktogramą. |
| vbInformacija | 64 | Rodyti informacijos pranešimo piktogramą. |
| vbDefaultButton1 | 0 | Pirmasis mygtukas yra numatytasis. |
| vbDefaultButton2 | 256 | Antrasis mygtukas yra numatytasis. |
| vbDefaultButton3 | 512 | Trečiasis mygtukas yra numatytasis. |
| vbDefaultButton4 | 768 | Ketvirtasis mygtukas yra numatytasis. |
| vbApplicationModal | 0 | Taikymo būdas; Prieš tęsdamas darbą su dabartine taikomąja programa, vartotojas turi atsakyti į pranešimo lauką. |
| vbSystemModal | 4096 | Sistemos modalinis; Visos programos laikinai sustabdomos, kol vartotojas atsako į pranešimo lauką. |
| vbMsgBoxHelpButton | 16384 | Į pranešimo lauką įtraukia mygtuką Žinynas |
| VbMsgBoxSetForeplane | 65536 | Nurodo pranešimo lauko langą kaip priekinio plano langą |
| vbMsgBoxRight | 524288 | Tekstas lygiuojamas dešinėje |
| vbMsgBoxRtlReading | 1048576 | Nurodo, kad tekstas turi būti rodomas kaip skaitymas iš dešinės į kairę hebrajų ir arabų sistemose |
Pirmoji reikšmių grupė (0–5) apibūdina dialogo lange rodomų mygtukų skaičių ir tipą; antroji grupė (16, 32, 48, 64) apibūdina piktogramų stilių; trečioji grupė (0, 256, 512) nustato, kuris mygtukas yra numatytasis; o ketvirtoji grupė (0, 4096) nustato pranešimo lauko modalumą. Pridėdami skaičius, norėdami sukurti galutinę mygtuko argumento reikšmę, naudokite tik po vieną skaičių iš kiekvienos grupės.
Pastaba
Šias konstantas nurodo "Visual Basic for Applications". Todėl pavadinimus galima naudoti bet kurioje kodo vietoje vietoje faktinių reikšmių.
Pateikiamos reikšmės
| Konstanta | Reikšmė | Aprašas |
|---|---|---|
| vbOK | 1 | Gerai |
| vbAtšaukti | 2 | Atšaukimas |
| vbAbort | 3 | Nutraukti |
| vbRetry | 4 | Bandyti dar kartą |
| vbIgnore | 5 | Nepaisyti |
| vbTaip | 6 | Taip |
| vbNo | 7 | Ne |
Pastabos
Kai yra pateiktas žinyno failas ir kontekstas , vartotojas gali paspausti F1 ("Windows") arba ŽINYNAS ("macOS") ir peržiūrėti kontekstą atitinkančią žinyno temą. Kai kurios pagrindinės taikomosios programos, pvz., "Microsoft Excel", taip pat automatiškai įtraukia žinyno mygtuką į dialogo langą.
Jei dialogo lange rodomas mygtukas Atšaukti , paspaudus klavišą ESC veikia taip pat, kaip ir spustelėjus Atšaukti. Jei dialogo lange yra mygtukas Žinynas , pateikiamas kontekstinis dialogo lango žinynas. Tačiau jokia vertė negrąžinama, kol nespustelėjamas vienas iš kitų mygtukų.
Pastaba
Norėdami nurodyti daugiau nei pirmą įvardintą argumentą, reiškinyje turite naudoti "MsgBox ". Norėdami praleisti kai kuriuos pozicinius argumentus, turite įtraukti atitinkamą kablelio skyriklį.
Pavyzdys
Pastaba
Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje.
Šiame pavyzdyje naudojama funkcija "MsgBox ", kad dialogo lange būtų rodomas kritinės klaidos pranešimas su mygtukais Taip ir Ne. Mygtukas Ne nurodytas kaip numatytasis atsakymas. Funkcijos "MsgBox " grąžinama reikšmė priklauso nuo vartotojo pasirinkto mygtuko. Šiame pavyzdyje daroma prielaida, kad DEMO.HLP tai yra žinyno failas, kuriame yra tema, kurios žinyno konteksto numeris lygus 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