Ввод, вывод

Вывод на форму текстовых сообщений можно производить различными способами:

· с помощью элемента управления Label;

· с помощью элемента управления TextBox;

· используя метод Print;

· используя функцию MsgBox

Формат оператора Print:

[имя формы.]Print[[выражение] [{;,}]]…

Если после выражения стоит “;” то за последним символом предыдущего выражения сразу выводится следующее. Если стоит “,” то вывод производится по зонам, каждая из которых имеет размер 14 символов. Отсутствие после последнего выражения знака переводит позицию вывода в начало следующей строки.

В операторе Print можно использовать форматированный вывод, для чего следует использовать функции:

TAB используется для перемещения курсора в указанную позицию вывода на экран или печати.

TAB(столбец%)

столбец% -номер столбца новой позиции печати.

Пример: РRINT TAB(25); "Текст"

SРC оставляет заданное число пробелов

SРC(n%)

n% число пробелов; значения в диапазоне от 0 до 32767.

Пример: РRINT "Текст1"; SРC(10); "Текст2"

Format – задает формат пользователя

Format(выражение [, format])

В качестве format можно использовать следующие символы:

# позиция цифры

. позиция десятичной точки

, позиция запятой

% - знак процента

> - все прописные буквы

< - все строчные буквы

Например:

MyStr = Format( 5459.4, "##,##0.00" ) ' получим "5,459.40".

MyStr = Format( 334.9, "###0.00" ) ' получим "334.90".

MyStr = Format( 5, "0.00%" ) ' получим "500.00%".

MyStr = Format( "HELLO", "<" ) ' получим "hello".

MyStr = Format( "This is it", ">" ) ' получим "THIS IS IT".

MsgBox(Сообщение$[, ЧисКод1+ЧисКод2][, Заголовок$]) – позволяет выводить сообщениене на форме, а на специальной панели сообщений (Панель сообщений).

Например: bytB=MsgBox(“Уважаемый ” + strA + “, Вы готовы к проверке знаний? ”, 36, “Конец регистрации”)

Появится панель сообщений, в заголовке которой будет написано: Конец регистрации, а на панели Уважаемый, Вы готовы к проверке знаний?

Число 36 обеспечивает вывод информационного окна типа вопрос, которое имеет две кнопки Да и Нет

Аргументы ЧисКод1 и ЧисКод 2 можно менять, тогда изменится внешний вид окна.

ЧисКод1 – определяет вид пиктограммы, которая помещается на панель сообщений, а ЧисКод2 определяет набор кнопок.

ЧисКод1	Пиктограмма

Значения ЧисКод1 и ЧисКод2, определяющие вид панели сообщений:

ЧисКод2	Набор кнопок
	Ок
	Ок, Отмена
	Стоп, Повтор, Пропустить
	Да, Нет, Отмена
	Да, Нет
	Повтор, Отмена

Нажатие на кнопку на панели сообщений приводит к вычислению значения функции, которое зависит от нажатой кнопки.

Значения функции MsBox

Нажатая кнопка	Значение функции
ОК
Отмена
Стоп
Повтор
Пропустить
Да
Нет

Ввод текстовой информации можно производить с помощью элемента управления TextBox или с помощью функции ввода InputBox.

InputBox(приглашение$, Заголовок$, [По умолчанию$]) – позволяет вводить данные с помощью диалоговой панели ввода (Окно ввода).

Например: strA=InputBox(“Введите ваше имя и фамилию:”, “Регистрация”)

Появится окно ввода, в заголовке окна напечатается: Регистрация, в самом окне Введите ваше имя и фамилию: