MsgBox, funksjon

I en Access-skrivebordsdatabase viser funksjonen MsgBox en melding i en dialogboks, venter på at brukeren velger en knapp og returnerer en Integer som angir hvilken knapp brukeren valgte.

Syntaks

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

Syntaksen MsgBox for har disse argumentene:

Argument	Beskrivelse
prompt	Obligatorisk. Strenguttrykk vist som meldingen i dialogboksen. Maksimumslengden på prompt kan være ca. 1024 tegn, avhengig av bredden på tegnene som brukes. Hvis prompt det er mer enn én linje, kan du skille linjene ved å bruke et returtegn (Chr(13)), et linjeskifttegn (Chr(10)) eller en kombinasjon av retur og linjeskift (Chr(13) & Chr(10)) mellom hver linje.
buttons	Valgfritt. Numerisk uttrykk som er summen av verdier som angir antallet og typen knapper som skal vises, ikonstilen som skal brukes, identiteten til standardknappen og modaliteten til meldingsboksen. Hvis utelatt, er 0standardverdien for buttons .
title	Valgfritt. Strenguttrykk vist i tittellinjen i dialogboksen. Hvis du utelater det title, vises navnet på programmet på tittellinjen.
helpfile	Valgfritt. Strenguttrykk som identifiserer hjelpefilen som skal brukes til å gi kontekstavhengig hjelp for dialogboksen. Hvis helpfile det er oppgitt, context må det også oppgis.
context	Valgfritt. Numerisk uttrykk som er kontekstnummeret i Hjelp som er tilordnet det aktuelle hjelpeemnet av Hjelp-forfatteren. Hvis context det er oppgitt, helpfile må det også oppgis.

Innstillinger

Argumentinnstillingene buttons er:

Konstant	Value	Beskrivelse
vbOKOnly	0	Vis bare OK .
vbOKCancel	1	Vis OK og Avbryt.
vbAbortRetryIgnore	2	Vis Avbryt, Prøv på nytt og Ignorer.
vbYesNoCancel	3	Vis Ja, Nei og Avbryt.
vbYesNo	4	Vis Ja og Nei.
vbRetryCancel	5	Vis Nytt forsøk og Avbryt.
vbCritical	16	Vise ikonet for kritisk melding .
vbQuestion	32	Vise ikonet for advarselsspørring .
vbExclamation	48	Vise ikonet for advarselsmeldingen .
vbInformation	64	Vise ikonet for informasjonsmelding .
vbDefaultButton1	0	Gjøre den første knappen til standard.
vbDefaultButton2	256	Gjøre den andre knappen til standard.
vbDefaultButton3	512	Gjøre den tredje knappen til standard.
vbDefaultButton4	768	Gjør den fjerde knappen til standard.
vbApplicationModal	0	Modal for søknad. Brukeren må svare på meldingsboksen før han fortsetter arbeidet i det gjeldende programmet.
vbSystemModal	4096	Systemmodal. Alle programmer er suspendert til brukeren svarer på meldingsboksen.
vbMsgBoxHelpButton	16384	Legg til en Hjelp-knapp i meldingsboksen.
VbMsgBoxSetForeground	65536	Angi meldingsboksvinduet som forgrunnsvindu.
vbMsgBoxRight	524288	Høyrejustere teksten.
vbMsgBoxRtlReading	1048576	Få teksten til å vises med høyre-mot-venstre-lesing i hebraisk og arabisk system.

Den første gruppen med verdier (0 gjennom 5) beskriver antallet og typen knapper som vises i dialogboksen. Den andre gruppen (16, 32, 48, 64) beskriver ikonstilen. Den tredje gruppen (0, 256, 512) bestemmer hvilken knapp som er standard. Den fjerde gruppen (0, 4096) bestemmer modaliteten til meldingsboksen. Når du legger sammen tall for å lage en endelig verdi for argumentet buttons , bruker du bare ett tall fra hver gruppe.

Returverdier

Konstant	Value	Beskrivelse
vbOK	1	OK
vbCancel	2	Avbryt
vbAbort	3	Avbryt
vbRetry	4	Prøv på nytt
vbIgnore	5	Ignorer
vbYes	6	Ja
vbNo	7	Nei

Merknader

Når begge helpfile og context er angitt, kan brukeren trykke F1 i Windows eller Hjelp i macOS for å vise Hjelp-emnet som samsvarer med context. Noen vertsprogrammer, for eksempel Microsoft Excel, legger også automatisk til en Hjelp-knapp i dialogboksen.

Hvis det vises en Avbryt-knapp i dialogboksen, har det samme effekt å trykke på ESC som å velge Avbryt. Hvis dialogboksen inneholder en Hjelp-knapp , får du kontekstavhengig hjelp for dialogboksen. Men ingen verdi returneres før brukeren velger en av de andre knappene.

Eksempel

I dette eksemplet brukes funksjonen MsgBox til å vise en kritisk feil-melding i en dialogboks med Ja - og Nei-knapper . Nei-knappen er angitt som standard svar. Verdien som returneres av funksjonen, MsgBox avhenger av knappen brukeren velger. Dette eksemplet antar at det DEMO.HLP er en Hjelp-fil som inneholder et emne med et Hjelp-kontekstnummer som er 1000likt .

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