Ввод и вывод данных

Для ввода и вывода данных на экран дисплея используются следующие стандартные окна диалога:

1. InputBox – вывод на экран окна приглашения к вводу информации и возвращение ввода пользователя; можно изменять только текст в титульной строке, приглашение к вводу, значение по умолчанию, позицию диалога и включать или нет кнопку Help

Общий формат:

InputBox ("строка_сообщение"[, "заголовок_окна"] [, "текст_по_умолчанию"] [, Хпоз] [, Yпоз] [, "файл_подсказки", "контекст"] ),

где "текст_по_умолчанию" – строка в текстовом блоке (может быть пустой); Хпоз, Yпоз – координаты левого верхнего угла окна.

Пример использования::

pwd=InputBox("Введите пароль:", "Регистрация").

2. MsgBox – отрывает окно сообщения и возвращает значение, указывающее командную кнопку, которую щелкнул пользователь; используется для получения от пользователя ответа ДА/НЕТ и для вывода кратких сообщений (ошибки, предупреждения).

Общий формат:

MsgBox ("строка_сообщение" [, "кнопки"] [, заголовок_окна] [, "файл_подсказки", "контекст"]),

где "кнопки" – число, являющееся суммой кодов типов кнопок; некоторые из кодов кнопок: 0 – ОК, 1 – ОК и ОТМЕНА, 2 – ПРЕКРАТИТЬ, ПОВТОРИТЬ и ОТМЕНА, 3 – ДА, НЕТ и ОТМЕНА, 4 – ДА и НЕТ, 5 – ПОВТОРИТЬ и ОТМЕНА.

Если в сообщении должно присутствовать значение переменной, то его надо преобразовать в строковый тип функцией Str() и выполнить конкатенацию строк операцией &.

Пример использования:

MsgBox( "Это сообщение VB", "Приложение VB").

При определенных условиях может использоваться функция PRINT, которая, в частности, может выводит данные на поле формы и имеет следующий синтаксис:

Print [ВЫРАЖЕНИЕ] [ ; | , ВЫРАЖЕНИЕ]...

где ВЫРАЖЕНИЕ – арифметическое или строковое выражение, значение которого выводится на экран; строковое выражение должно содержаться в кавычках; ; | , – устанавливает начало последующего вывода: если присутствует точка с запятой, то значение очередного выражения следует непосредственно за значением предыдущего, если же присутствует запятая, то значение очередного выражения размещается в начале следующей области вывода (область вывода – это блок из 14 символов); если в конце Print-выражения нет ни точки с запятой, ни запятой, то выполняется перевод строки и вывод следующего значения начинается с новой строки. При выводе чисел всегда резервируется одна позиция для знака числа.

Данная функция может использоваться совместно с такими функциями, как Spc(Kol) - вывод указанного количества пробелов (Kol); Tab(Col) – указывает позицию (Сol) вывода.

Пример: Print “Переменная k = ”; k

если переменная k предварительно получила значение 5 (k = 5), то в результате выполнения оператора Print на экране появится сообщение: Переменная k = 5.

Для обработки ввода с клавиатуры используются события KeyDown, KeyPress и KeyUp. При нажатии клавиши для активного элемента управления генерируются соответствующие события.

В качестве параметра процедуре обработки события KeyPress передается переменная KeyASCII, содержащая ANSI-код нажатой клавиши.

Private Sub Text1_KeyPress(KeyASCII As Integer)

MsgBox KeyASCII

End Sub

В примере код нажатой клавиши выводится в окне сообщений, если фокус принадлежит элементу управления с именем Text1. Значение переменной KeyASCII можно не только считывать, но и устанавливать: KeyASCII = Asc(Chr(KeyASCII)). В этом примере с помощью стандартных функций обработки строк (см. соответствующий раздел) все вводимые с клавиатуры символы преобразуются в прописные.

Событие KeyPress вызывается только при нажатии клавиш, имеющих ANSI-код. Для клавиш управления курсором и для функциональных используются события KeyUp и KeyDown. При этом в переменной KeyCode содержится клавиатурный код нажатой клавиши, а в переменной Shift - состояние клавиш Shift, Ctrl и Alt: 1 при нажатии Shift, 2 при нажатии Ctrl, 3 при нажатии Alt. Значения кодов отдельных клавиш можно просмотреть в каталоге объектов (KeyCodeConstans).

Для анализа действий мышью используются следующие события: Click - одинарный щелчок мыши, DblClick - двойной щелчок и др. Эти события можно также вызывать программно, изменяя для этого свойство Value.