Виведення даних
1) Функція MsgBox використовується для виведення даних або повідомлень на екран. Синтаксис функції:
MsgBox (запрошення[, кнопки][, заголовок][, файл допомоги][, контекст]),
де кнопки - константа, що визначає командні кнопки, які з'являються в діалоговому вікні. За замовчуванням установлюється значення 0. Інші параметри мають той же зміст, що і у функціїInputBox.
Деякі значення констант кнопок функціїMsgBox.
Константа Опис
0 Виводиться тільки кнопка ОК.
1 Виводяться кнопки ОК і Отмена.
3 Виводяться кнопки Да, Нет Отмена.
4 Виводяться кнопки Да, Нет.
ПРИМІТКА. Як і у всіх функціях VBA, вказівка аргументів функції MsgBoxу круглих дужках необхідна тільки тоді, коли планується використання повертаюче значення цієї функції. Якщо виводиться велике повідомлення, то VBA робить перенос тексту в рамках діалогового вікна. Для вказівки власних меж переносу в кожному рядку використовується функція Chrі код повернення каретки (ASCII 13), наприклад, дане повідомлення буде виводитися у два рядки:
MsgBox "Перший рядок" & Chr(13) & "Другий рядок"
2) Оператор Debug.Print використовується для виведення даних у вікно налагодження.
Синтаксис оператора:
Debug.Print a1 & a2 & a3 …
де a1, a2, a3 - константи, змінні, вирази. Щоб відкрити вікно налагодження, потрібно виконати команди
Вид(View) ( Вікно налагодження (Immediate Window)
Приклад лінійної програми. Обчислити площу трапеції за формулою S= , де a,b - основи, h - висота.
Sub Трапеція()
Dim a As Single, b As Single, h As Single, s As Single
a = Val (InputBox("Введіть значення а"))
b = Val (InputBox("Введіть значення b"))
h = Val (InputBox("Введіть значення h"))
s = (a + b) * h / 2
MsgBox "Площа трапеції = " & s
End Sub
Після запуску програми потрібно ввести значення a,b,h і на екрані з'явиться результат обчислення у вікні виду (рис.2.3.).
Рис.2.3 - Вікно функції MsgBox
Дата добавления: 2015-03-03; просмотров: 1264;