MsgBox funkcija

Taikoma
„Access“, skirta „Microsoft 365“ „Access 2024“ Access 2021 Access 2019 Access 2016

"Access" darbalaukio duomenų bazėje funkcija rodo pranešimą dialogo lange, laukia, kol vartotojas pasirinks mygtuką, ir pateikia Integer pranešimą, MsgBox nurodantį, kurį mygtuką vartotojas pasirinko.

Sintaksė

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

Funkcijos MsgBox sintaksė turi tokius argumentus:

Argumentas Aprašas
prompt Būtinas. Eilutės išraiška, rodoma kaip pranešimas dialogo lange. Didžiausias ilgis prompt yra apie 1024 simboliai, priklausomai nuo naudojamų simbolių pločio. Jei prompt yra daugiau nei viena eilutė, jas galite atskirti naudodami eilutės grįžimo simbolį (),Chr(13) eilutės tiekimo simbolį ()Chr(10) arba gabenimo grįžties ir eilutės informacijos santraukos derinį (Chr(13) & Chr(10)).
buttons Pasirinktinis. Skaitinis reiškinys, kuris yra reikšmių, nurodančių rodomų mygtukų skaičių ir tipą, naudotinos piktogramos stilių, numatytojo mygtuko tapatybę ir pranešimo lauko modalumą, suma. Jei nenurodyta, numatytoji reikšmė buttons yra 0.
title Pasirinktinis. Eilutės išraiška, rodoma dialogo lango pavadinimo juostoje. Jei jį praleisite title, programos pavadinimas bus rodomas pavadinimo juostoje.
helpfile Pasirinktinis. Eilutės išraiška, identifikuojanti žinyno failą, naudotiną teikiant kontekstinį dialogo lango žinyną. Jei helpfile pateikta, context taip pat turi būti pateikta.
context Pasirinktinis. Skaitinis reiškinys, kuris yra žinyno konteksto numeris, kurį žinyno autorius priskyrė atitinkamai žinyno temai. Jei context pateikta, helpfile taip pat turi būti pateikta.

Parametrai

Argumento buttons parametrai yra:

Konstanta Reikšmė Aprašas
vbOKOnly 0 Rodyti tik gerai .
vbOKCancel 1 Rodykite OK ir Cancel.
vbAbortRetryIgnore 2 Rodyti Nutraukti, Kartoti ir Nepaisyti.
vbYesNoCancel 3 Rodykite Taip, Ne ir Atšaukti.
vbYesNo 4 Rodykite Taip ir Ne.
vbRetryCancel 5 Rodyti Kartoti ir Atšaukti.
vbCritical 16 Rodyti kritinio pranešimo piktogramą.
vbQuestion 32 Rodyti įspėjimo užklausos piktogramą.
vbExclamation 48 Rodyti įspėjimo pranešimo piktogramą.
vbInformation 64 Rodyti informacinio pranešimo piktogramą.
vbDefaultButton1 0 Nustatyti pirmąjį mygtuką kaip numatytąjį.
vbDefaultButton2 256 Antrąjį mygtuką padarykite numatytuoju.
vbDefaultButton3 512 Nustatyti trečiąjį mygtuką kaip numatytąjį.
vbDefaultButton4 768 Ketvirtasis mygtukas tampa numatytuoju.
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ą įtraukite žinyno mygtuką.
VbMsgBoxSetForeground 65536 Nurodykite pranešimo lauko langą kaip priekinio plano langą.
vbMsgBoxRight 524288 Lygiuoti tekstą dešinėje.
vbMsgBoxRtlReading 1048576 Hebrajų ir arabų sistemose tekstas turi būti rodomas skaitant iš dešinės į kairę.

Pirmoji reikšmių grupė (0 iki 5) aprašo dialogo lange rodomų mygtukų skaičių ir tipą. Antroji grupė (16, 32, 48, 64) aprašo piktogramos stilių. Trečioji grupė (0, , 512) nustato, 256kuris mygtukas yra numatytasis. Ketvirtoji grupė (0, 4096) nurodo pranešimo lauko modalumą. Kai pridedate skaičius, kad sukurtumėte galutinę argumento buttons reikšmę, naudokite tik po vieną skaičių iš kiekvienos grupės.

Pastaba

Šias konstantas nurodo "Visual Basic for Applications". Todėl vietoj faktinių reikšmių kodus galite naudoti pavadinimus.

Pateikiamos reikšmės

Konstanta Reikšmė Aprašas
vbOK 1 Gerai
vbCancel 2 Atšaukimas
vbAbort 3 Nutraukti
vbRetry 4 Bandyti dar kartą
vbIgnore 5 Nepaisyti
vbYes 6 Taip
vbNo 7 Ne

Pastabos

Kai pateikiami abu helpfile ir context pateikti, vartotojas gali paspausti F1 sistemoje "Windows" arba žinyne sistemoje "macOS", kad peržiūrėtų atitinkamą contextž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 Esc veikia taip pat, kaip ir pasirinkus Atšaukti. Jei dialogo lange yra mygtukas Žinynas , pateikiamas kontekstinis dialogo lango žinynas. Tačiau jokia vertė negrąžinama, kol vartotojas nepasirenka vieno iš kitų mygtukų.

Pastaba

Norėdami nurodyti daugiau nei pirmą įvardintą argumentą, turite jį naudoti MsgBox reiškinyje. Norėdami praleisti kai kuriuos pozicinius argumentus, turite įtraukti atitinkamą kablelio skyriklį.

Pavyzdys

Pastaba

Toliau pateiktame pavyzdyje parodyta, kaip naudoti šią funkciją "Visual Basic for Applications" (VBA) modulyje.

Šiame pavyzdyje naudojama MsgBox funkcija, skirta kritinės klaidos pranešimui dialogo lange su mygtukais Taip ir Ne . Mygtukas Ne nurodytas kaip numatytasis atsakymas. Funkcijos grąžinama MsgBox 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