Dim a As single

Dim V As String

V= InputBox (“Введите слово”)

При работе функции выводится диалоговое окно с приглашением на ввод информации в текстовом поле (рис. 13.1). После ввода данных функция возвращает их как строчные данные. Если мы ввели строку Начало работы в 8.00, то переменной V будет присвоена эта строка.

Введенные числовые данные возвращаются функцией как строчные, поэтому при вводе числа необходимо использовать функцию Val, преобразующую строку в число. Например, требуется ввести значение переменной а= 13.65.

Запишем фрагмент программы ввода:

a= Val(inputBox(" Введите значение а "))

Синтаксис полного представления функции inputBox(), включает необязательные параметры: [Заголовок окна ]

[ввод по умолчанию ], [гориз. расположение окна ], [верт. расположение окна ], [помощь ], [ контекст ].

3.Фрагмент программы ввода данных с помощью окна TextBox на форме (рис. 13.3):

Дата добавления: 2014-01-13