Как да покажете малък диалогов прозорец за миг
Искате ли да включите кратка, интерактивна информация за потребителя във вашата програма VBA? Не е задължително да създавате сложен диалогов прозорец (UserForm).
За малки задачи можете да извикате предварително зададен прозорец за съобщения с помощта на функцията MsgBox (абревиатурата означава "кутия за съобщения").
Извиквате командата в следната форма:
Върната стойност = MsgBox (текст на прозореца, тип на прозореца, заглавие на прозореца)
С текстовия параметър на прозореца подавате текста, който искате да покажете в прозореца, например текста „Този текст се появява в прозорец за съобщение“. Въведете текста в кавички.
Параметърът тип прозорец казва на Excel как трябва да изглежда прозорецът. Предварително дефинираните константи са налични за това. Най -важните константи са:
vbOKСамо: Показва само бутон "OK"
vbOKОтказ: Показва бутоните OK и Cancel.
vbRetryIgnoreCancel: Показва бутоните за повторен опит, игнориране и отмяна.
С параметъра заглавие на прозореца подавате текст, който се показва в заглавката на прозореца. Също така поставете тази стойност в кавички. Пример е фразата „Това е заглавието на прозореца“.
Следният програмен ред демонстрира използването на функцията MsgBox чрез пример:
Показване на подпрозорец
a = MsgBox ("Този текст се появява в прозореца на съобщението", vbokcancel, "Това е заглавието на прозореца")
End Sub
Ако Excel изпълни командата, ще получите прозореца от следната фигура:
Можете да попитате кой бутон потребителят използва за затваряне на прозореца, като използва променливата на връщаната стойност, в случая на примера на програмата, като използва променливата "a". Възможните стойности за връщане са vbOk, vbCancel, vbRetry, vbIgnore за съответните бутони.