Студопедия

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника



Ввод данных с помощью функции InputBox




Читайте также:
  1. A. осуществляет передачу данных устройствам компьютера.
  2. B) Элемент диаграммы, показывающий название и маркеры данных диаграммы
  3. E) схема данных.
  4. Foreign Office – структура, функции…..
  5. II. Системы, развитие которых можно представить с помощью Универсальной Схемы Эволюции
  6. III. Вегетативные функции НС.
  7. III. Решение логических задач с помощью рассуждений
  8. III. Функции полномочного представителя
  9. Lt;variant>возлагается. Эта обязанность состоит в том, что обвиняемому дозволяется обратиться за юридической помощью
  10. lt;variant>Эта обязанность состоит в том, что обвиняемому дозволяется обратиться за юридической помощью

Для ввода значения переменной можно воспользоваться функцией с именем InputBox. Она выводит на экран диалоговое окно, содержащее сообщение и поле ввода, возвращает значение типа String, содержащее текст, введенный в поле ввода.

Упрощенный синтаксис обращения к функции:

InputBox(Сообщение,[Заголовок])

У этой функции первый слева аргумент обязательный, а все остальные – необязательные. Назначение аргументов:

Сообщение – выражение типа String, отображаемое в диалоговом окне;

Заголовок – выражение типа String, отображаемое в строке заголовка диалогового окна.

 

Пример.

 

Private Sub Command1_Click()

Label2.Caption = InputBox(

”Пожалуйста, введите Ваше имя”)

End Sub

В этой процедуре вызывается функция InputBox. При выполнении эта функция выводит диалоговое окно с запросом-подсказкой на ввод данных пользователем (рис. 5.4).


Значение аргумента функции InputBox выведено в виде запроса-подсказки в окне функции InputBox. Значением функции InputBox будет строка символов, которую пользователь наберет в поле окна функции InputBox. Это возвращаемое значение функцией InputBox присваивается свойству Caption надписи Label2.

 

Еще один пример:

 

Private Sub Command1_Click()

Dim Приглашение As String

Dim ПолноеИмя As String

Dim i As Integer, s As Single

Приглашение = "Пожалуйста, введите Ваше имя!"

ПолноеИмя = InputBox(Приглашение)

Label2.Caption = ПолноеИмя

i = InputBox("Задайте значение i")

‘String -> Integer

Label3.Caption = "i=" & i ‘Integer -> String

s = InputBox("Задайте значение s")

‘String ->Single

Label4.Caption = "s=" & s ‘Single -> String

End Sub

 

В процедуре Command1_Click объявлены четыре переменных, в том числе переменная i целого типа и переменная s с плавающей точкой обычной точности. Этим переменным также задаются значения с помощью обращений к функции InputBox. Полученные переменными i и s значения затем отображаются в полях надписей Label3 и Label4 соответственно.

 


Дата добавления: 2014-12-03; просмотров: 10; Нарушение авторских прав







lektsii.com - Лекции.Ком - 2014-2022 год. (0.009 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав
Главная страница Случайная страница Контакты