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):