В настолна база данни на Access функцията MsgBox показва съобщение в диалоговия прозорец, изчаква потребителят да щракне върху бутон и връща цяло число , показващо кой бутон е кликнал.
Синтаксис
MsgBox ( подкана [, бутони ][; заглавие ][, helpfile ] [; контекст ] )
Синтаксисът на функцията MsgBox има следните аргументи:
|
Аргумент |
Описание |
|
подкана |
Задължително. Текстов израз, показан като съобщение в диалоговия прозорец. Максималната дължина на подканата е около 1024 знака, в зависимост от ширината на използваните знаци. Ако " подкана " се състои от повече от един ред, можете да разделите редовете с помощта на знак за връщане (chr(13)), знак за linefeed (chr(10)) или връщане – linefeed комбинация (chr(13) & chr(10)) между редовете. |
|
бутони |
Незадължително. числов израз, което е сборът от стойности, указващи броя и типа на бутоните за показване, стила на иконите за използване, самоличността на бутона по подразбиране и обусловеност на полето за съобщения. Ако е пропуснато, стойността по подразбиране за бутоните е 0. |
|
Заглавие |
Незадължително. Израз на низ, показан в заглавната лента на диалоговия прозорец. Ако изпуснете заглавието, името на приложението се поставя в заглавната лента. |
|
helpfile |
Незадължително. Текстов израз, който идентифицира помощния файл, който да се използва за предоставяне на контекстно зависима помощ за диалоговия прозорец. Ако helpfile е предоставено, трябва също да бъде предоставен контекст . |
|
контекст |
Незадължително. Числов израз, който е номерът на помощния контекст, присвоен на съответната помощна тема от автора на помощта. Ако е предоставен контекст , трябва също да се предостави helpfile . |
Настройки
Бутоните аргумент настройки са:
|
Константа |
Стойност |
Описание |
|
vbOKOnly |
0 |
Покажи само бутона за OK . |
|
vbOKCancel |
1 |
Показване на бутоните OK и Cancel . |
|
vbAbortRetryIgnore |
2 |
Показване на прекратени, повторен опити Игнориране на бутоните. |
|
vbYesNoCancel |
3 |
Показване на бутоните "да", " не" и "Отказ" . |
|
vbYesNo |
4 |
Показване на бутоните "да" и "не ". |
|
vbRetryCancel |
5 |
Показване на бутоните " Опитай отново" и "Отказ" . |
|
vbCritical |
16 |
Показване на иконата за критично съобщение . |
|
vbQuestion |
32 |
Икона за показване на предупредителната заявка . |
|
vbExclamation |
48 |
Икона за показване на предупредително съобщение . |
|
vbInformation |
64 |
Икона за показване на информационно съобщение . |
|
vbDefaultButton1 |
0 |
Бутонът First е по подразбиране. |
|
vbDefaultButton2 |
256 |
Бутонът Second е по подразбиране. |
|
vbDefaultButton3 |
512 |
Трети бутон е по подразбиране. |
|
vbDefaultButton4 |
768 |
Бутонът четвърти е по подразбиране. |
|
vbApplicationModal |
0 |
Модални приложения; Потребителят трябва да отговори на полето за съобщения, преди да продължи да работи в текущото приложение. |
|
vbSystemModal |
4096 |
Система за прехвърляне; всички приложения са прекъснати, докато потребителят не отговори на полето за съобщения. |
|
vbMsgBoxHelpButton |
16384 |
Бутон за добавяне на помощ към полето за съобщения |
|
VbMsgBoxSetForeground |
65536 |
Указва прозореца на полето за съобщения като прозорец на преден план |
|
vbMsgBoxRight |
524288 |
Текстът е подравняване отдясно |
|
vbMsgBoxRtlReading |
1048576 |
Указва, че текстът трябва да се показва като четене отдясно наляво на иврит и арабски системи |
Съвет: В Access 2010, Конструкторът на изрази разполага с IntelliSense, така че можете да видите какви аргументи изисква Вашият израз.
Първата група от стойности (0 – 5) описва броя и типа на бутоните, показани в диалоговия прозорец; втората група (16; 32; 48; 64) описва стила на иконите; третата група (0; 256; 512) определя кой бутон е по подразбиране; а четвъртата група (0; 4096) определя обусловеност на полето за съобщения. Когато добавяте числа, за да създадете крайна стойност за аргумента за бутоните , използвайте само едно число от всяка група.
Забележка: Тези константи се задават от Visual Basic for Applications. В резултат на това имената могат да бъдат използвани навсякъде във вашия код вместо действителните стойности.
Връщащи се стойности
|
Константа |
Стойност |
Описание |
|
vbOK |
1 |
OK |
|
vbCancel |
2 |
Отказ |
|
vbAbort |
3 |
Прекъсване |
|
vbRetry |
4 |
Опитайте |
|
vbIgnore |
5 |
Игнорира |
|
vbYes |
6 |
Да |
|
vbNo |
7 |
Не |
Забележки
Когато и helpfile , и контекстът са осигурени, потребителят може да натисне F1 (Windows) или помощ (Macintosh), за да видите помощната тема, съответстваща на контекста. Някои хостващи приложения, например Microsoft Excel, също автоматично добавят бутон " помощ " в диалоговия прозорец.
Ако в диалоговия прозорец е показан бутон за Отказ , натискането на клавиша ESC има същия ефект като щракването върху Отказ. Ако диалоговият прозорец съдържа помощен бутон, за диалоговия прозорец е предоставена контекстна чувствителна помощ. Обаче, не се връща стойност, докато не се щракне върху един от другите бутони.
Забележка: За да укажете повече от първия наименуван аргумент, трябва да използвате MsgBox в израз. За да пропуснете някои позиционни аргументи, трябва да включите съответния разделител за запетаи.
Пример
Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA).
Този пример използва функцията MsgBox , за да покаже съобщение за критична грешка в диалогов прозорец с бутони "да" и "не". Бутонът ' ' не ' ' е зададен като отговор по подразбиране. Стойността, върната от функцията MsgBox , зависи от избрания от потребителя бутон. Този пример предполага, че DEMO.HLP е помощен файл, който съдържа тема с контекстно число, равно на 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
