End Sub. Dim PushButton As Integer

Dim PushButton As Integer

Dim str_SnFn As String

str_SnFn = InputBox("Введите Ваше имя и фамилию:", "Регистрация")

PushButton = MsgBox("Уважаемый " + str_SnFn + ", Вы готовы к проверке знания?", 36, "Конец регистрации")

Результат роботи програми на етапі введення даних в діалоговому вікні InputBox зображений на рис. 4.12.

Рисунок 4.12 – Ілюстрація введення даних за допомогою функції InputBox

Результат роботи програми на етапі виведення повідомлення тестованому в діалоговому вікні MsgBox зображений на рис. 4.13.

Рисунок 4.13 – Ілюстрація виведення повідомлення за допомогою функції MsgBox

Вікно MsgBox має дві кнопки «Да» і «Нет», оскільки в аргументах функції з'явився код 36. Докладніше про цей і інші коди для створення кнопок в діалогових вікнах в наступному параграфі

4.8 Способи програмного виведення інформації

Для виведення інформації в Visual Basic можна використовувати наступні засоби.

1. Виведення інформації з використанням методу Print (метод визначений для форм).

За допомогою методу Print можна друкувати тексти на формі, а також на зображенні.

Синтаксис:

[об'єкт.] Print [СписокВиведення]

Тут об'єкт – це ім'я форми, яке може бути опущений для поточної форми.

СписокВиведення – текст, який друкується на формі.

Декілька елементів в списку висновку відділяються один від одного крапкою з комою (;) або комою (,). При використанні коми між елементами СпискуВиведення будуть зроблені інтервали. При використанні крапки з комою між елементами СпискуВиведення вони будуть надруковані один за одним без перерви.

Наприклад, наступна операція виведе повідомлення у формі Form1:

Form1.Print "Це форма Form1"

Якщо ж форма Form1 є поточною, то ім'я об'єкту в команді може бути опущено і команда буде записана коротше:

Print "Це форма Form1"

Якщо список виведення не закінчується крапкою з комою (;) або комою (,), то кожне звернення до методу Print починає виведення в наступному рядку. Якщо список виведення закінчується крапкою з комою (;), то наступне звернення до методу Print приведе до продовження друку в тому ж рядку без перерви. Якщо ж список виведення закінчується комою (,), то наступне звернення до інструкції Print приведе до продовження друку в тому ж рядку з деяким відступом.

Якщо потрібно роздрукувати значення декількох даних в одному рядку, то всі їх потрібно перерахувати після методу Print в СпискуВиведення.

Дата добавления: 2015-05-24