Ввод из окна ввода

Ввод данных из окна ввода осуществляется вызовом функции InputBox, возвращаемым значением которой является строка, введенная пользователем. В общем виде инструкция для ввода данных с использованием функции InputBox, выглядит так:

Переменная:= InputBox (Заголовок, Подсказка, Значение);

где

Переменная — имя переменной строкового типа, значение которой должно быть получено из окна ввода;

Заголовок — текст заголовка окна ввода;

Подсказка — текст поясняющего сообщения;

Значение - текст, находящийся в поле ввода в момент появления окна ввода на экране.

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

s:=InputBox('Фунты-килограммы', 'Введите вес в фунтах',");

Выполняется эта инструкция следующим образом:

1. На экран монитора выводится окно ввода (рис.7.2 ).

2. В поле ввода вводится (набирается на клавиатуре) число.

 

 

 

 

Рис. 7.2. Пример окна ввода

3. Затем необходимо щелкнуть одну из командных кнопок окна ввода:

• Щелчок на кнопке ОК присваивает переменной s значение, соответствующее введенной строке

• Щелчок на кнопке Cancelприсваивает переменной s предопределенное значение, указанное при вызове функции InputBox в качестве ее аргумента (в данном примере переменной выбудет присвоено ",т.е. пустая строка)

Следует еще раз обратить внимание на то, что значение функции InputBox строкового типа. Поэтому, если программе надо получить значение числового типа, то введенная строка (изображение числа) должна быть преобразована в число при помощи соответствующей функции преобразования. Например, если в программе переменной funt вещественного (real) типа, то инструкции, обеспечивающие ввод ее значения, могут выглядеть так:

s:= InputBox ('Фунты-килограммы',' Введите вес в фунтах',");

funt:=StrToFloat(s);