Funktionen MsgBox

I en Access-skrivebordsdatabase viser funktionen en meddelelse i en dialogboks, MsgBox venter på, at brugeren vælger en knap, og returnerer en Integer , der angiver, hvilken knap brugeren har valgt.

Syntaks

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

Syntaksen MsgBox for funktionen har disse argumenter:

Argument	Beskrivelse
prompt	Obligatorisk. Strengudtryk, der vises som meddelelsen i dialogboksen. Den maksimale længde prompt på er 1.024 tegn, afhængigt af bredden af de tegn, der bruges. Hvis prompt der er mere end én linje, kan du adskille linjerne ved at bruge vognreturtegn (Chr(13)), et linjeskifttegn (Chr(10)) eller en vognretur-linjeskift-kombination (Chr(13) & Chr(10)) mellem hver linje.
buttons	Valgfrit. Numerisk udtryk, som er summen af værdier, der angiver antallet og typen af knapper, der skal vises, den ikontypografi, der skal bruges, standardknappens identitet og meddelelsesboksens modalitet. Hvis det udelades, er 0standardværdien for buttons .
title	Valgfrit. Strengudtryk, der vises i dialogboksens titellinje. Hvis du udelader title, vises programmets navn i titellinjen.
helpfile	Valgfrit. Strengudtryk, der identificerer Hjælp-filen, der bruges til kontekstafhængig hjælp til dialogboksen. Hvis helpfile det angives, context skal det også angives.
context	Valgfrit. Numerisk udtryk, som er det Hjælp-kontekstnummer, der tildeles til det relevante emne i Hjælp af forfatteren til Hjælp. Hvis context det angives, helpfile skal det også angives.

Indstillinger

Indstillingerne buttons for argumentet er:

Konstant	Værdi	Beskrivelse
vbOKOnly	0	Vis kun OK .
vbOKCancel	1	Vis OK og Annuller.
vbAbortRetryIgnore	2	Visning: Afbryd, prøv igen og ignorer.
vbYesNoCancel	3	Vis Ja, Nej og Annuller.
vbYesNo	4	Vis Ja og Nej.
vbRetryCancel	5	Vis Prøv igen og Annuller.
vbCritical	16	Vis ikonet for kritisk meddelelse .
vbQuestion	32	Vis ikonet for advarselsforespørgsel .
vbExclamation	48	Vis ikonet for advarselsmeddelelsen .
vbInformation	64	Vis ikonet for informationsmeddelelse .
vbDefaultButton1	0	Gør den første knap til standard.
vbDefaultButton2	256	Gøre den anden knap til standard.
vbDefaultButton3	512	Gør den tredje knap til standard.
vbDefaultButton4	768	Gør den fjerde knap til standard.
vbApplicationModal	0	Programmodal. Brugeren skal reagere på meddelelsesboksen, før arbejdet fortsættes i det aktuelle program.
vbSystemModal	4096	Systemmodal. Alle programmer suspenderes, indtil brugeren reagerer på meddelelsesboksen.
vbMsgBoxHelpButton	16384	Føje en Hjælp-knap til meddelelsesboksen.
VbMsgBoxSetForeground	65536	Angiv vinduet med meddelelsesboksen som vinduet i forgrunden.
vbMsgBoxRight	524288	Højrejustere teksten.
vbMsgBoxRtlReading	1048576	Få teksten til at se ud med højre mod venstre-læsning på hebraisk og arabisk system.

Den første gruppe af værdier (0 gennem 5) beskriver antallet og typen af knapper, der vises i dialogboksen. Den anden gruppe (16, 32, 48, 64) beskriver ikontypografien. Den tredje gruppe (0, 256, 512) bestemmer, hvilken knap der er standard. Den fjerde gruppe (0, 4096) bestemmer meddelelsesboksens modalitet. Når du lægger tal sammen for at oprette en endelig værdi for argumentet buttons , skal du kun bruge ét tal fra hver gruppe.

Returværdier

Konstant	Værdi	Beskrivelse
vbOK	1	OK
vbCancel	2	Annuller
vbAbort	3	Afbryd
vbRetry	4	Prøv igen
vbIgnore	5	Ignorer
vbYes	6	Ja
vbNo	7	Nej

Bemærkninger

Når begge helpfile og context er angivet, kan brugeren trykke på F1 i Windows eller Hjælp i macOS for at få vist det Hjælp-emne, der matcher context. Visse værtsprogrammer, f.eks. Microsoft Excel, føjer også automatisk en Hjælp-knap til dialogboksen.

Hvis dialogboksen viser en Annuller-knap , har et tryk på Esc-knappen samme virkning som et valg af Annuller. Hvis dialogboksen indeholder en Hjælp-knap, findes der kontekstafhængig hjælp til dialogboksen. Der returneres dog ingen værdi, før brugeren vælger en af de andre knapper.

Eksempel

I dette eksempel bruges MsgBox funktionen til at vise en kritisk fejlmeddelelse i en dialogboks med knapperne Ja og Nej . Knappen Nej er angivet som standardsvaret. Den værdi, der returneres af funktionen MsgBox , afhænger af den knap, som brugeren vælger. I dette eksempel antages det, at det DEMO.HLP er en Hjælp-fil, der indeholder et emne med et Hjælp-konteksttal lig med 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