![]() Главная страница Случайная страница КАТЕГОРИИ: АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Окно ввода
Окно ввода, как и окно сообщения, может отображаться оператором или функцией. Сокращенный синтаксис функции выглядит так:
Dim гс As String гс = InputВох(сообщение, заголовок, умолчание)
На этот раз параметр атрибуты отсутствует, однако появляется дополнительный параметр умолчание. В нем можно задать строку, которая будет по умолчанию находиться в текстовом поле. Когда пользователь нажимает кнопку OK, содержимое этого поля присваивается переменной (в нашем примере rс). Если пользователь нажал кнопку Cancel, возвращается строка нулевой длины.
ПРИМЕЧАНИЕ Обратите внимание — функция InputBox возвращает строку, а функция MsgBox — значение целого типа.
Следующий пример показывает, как пользоваться функцией InputBox: 1. Создайте новый проект командой File > New Project 2. Выберите в Project Wizard значок Standard EXE. 3. Добавьте кнопку на форму Form1. 4. В окне свойств задайте свойству Name кнопки значение cmdTryMe. 5. Задайте свойству Caption кнопки значение & Нажми меня. 6. Дважды щелкните на кнопке cmdTryMe, чтобы открыть окно программы. 7. Добавьте следующий фрагмент в процедуру события Click кнопки cmdTryMe:
Private Sub cmdTryMe_Click() Dim rс As String rc = InputВох(" Введите имя: ") MsgBox " Привет, " & rс & "! " End Sub
8. Запустите программу командой Run > Start. 9. Нажмите кнопку, чтобы вызвать диалоговое окно InputBox. 10. Введите в текстовом поле свое имя и нажмите кнопку ОК. Этот маленький пример в общих чертах показывает, как работают диалоговые окна MsgBox и InputBox. Если все сделано правильно, в окне ввода вам будет предложено ввести имя, после чего Visual Basic выдает окно сообщения со строкой типа «Привет, Стив!» (разумеется, в вашем случае будет выведено имя, заданное в окне ввода).
|