![]() |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
|
Ввести данные в программу можно с помощью текстового поля TextBox, как это делалось в предыдущей лабораторной работе. Для ввода используется свойство Text текстового поля.
Х = TextBox1.Text
В результате такого действия в переменную Х будет записана строковая величина, введенная в текстовое поле. Если ввести требуется число, то необходимо преобразовать строку в число. Для этого можно воспользоваться функцией Val.
Х = Val(TextBox1.Text)
Ввести данные можно с помощью функции InputBox. Функция InputBox выводит на экран диалоговое окно, содержащее сообщение, поле ввода и две кнопки Ok и Cancel. Она устанавливает режим ожидания ввода данных пользователем и нажатия кнопки. При нажатии на кнопку Ok возвращает значение типа String, если в поле ввода введен текст. Если в поле ввода введено число, то это будет число. При нажатии кнопки Cancel возвращается пустая строка.
InputBox(Promt [, Title] [, Default] [, Xpos] [,Ypos] [, Helpfile, Context])
Promt — строковое выражение, отображаемое как сообщение в диалоговом окне.
Title — строковое выражение, отображаемое в строке заголовка диалогового окна.
Default — строковое выражение, отображаемое в поле ввода как используемое по умолчанию.
Xpos,Ypos — позиции вывода окна.
Helpfile, Context — имя справочного файла и номер раздела справочной службы.
То, что записано в квадратных скобках, можно опускать. Пример:
Dim N As String, D As Single
N = InputBox(«Введите пароль»)
D = InputBox(«Введите диаметр»)
Дата публикования: 2015-10-09; Прочитано: 215 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!