Введение в информатику. Хамухин А.А. - 82 стр.

UptoLike

Составители: 

81
Таблица 3.6
Описание аргументов функции InputBox
Аргумент
Описание
prompt
Обязательный аргумент. Произвольный текст, предлагающий
пользователю набрать что-либо в окне ввода. Максимально 1024
символа
title
Заголовок окна. Необязательный аргумент
default
Подсказка пользователю в строке ввода, которая будет передана
в переменную VBA, если пользователь ничего не наберет в строке
ввода Необязательный аргумент
xpos
Расстояние по горизонтали от левого края экрана до окна.
Необязательный аргумент
ypos
Расстояние по вертикали от верхнего края экрана до окна.
Необязательный аргумент
helpfile
Имя файла, который можно вызвать по кнопке Help.
Необязательный аргумент
context
Число, которое передается в helpfile, для выдачи контекстной
справки. Необязательный аргумент
Если данные в строке ввода отсутствуют, или нажата кнопка Cancel, то
возвращается пустая строка.
Пример
Sub Pro12()
Dim Mess, Tit, Def, MyVal
Mess = "Введи число между 1 и 3" ' задали строку приглашения
Tit = "InputBox Demo" ' задали титул окна
Def = "1" ' установили значение по умолчанию
MyV = InputBox(Mess, Tit, Def)
MsgBox (MyV)
' То же окно на другой позиции 100, 400.
MyV = InputBox(Mess, Tit, Def, 100, 400)
MsgBox (MyV)
End Sub
3.6.2. Функция MsgBox
Функция MsgBox показывает сообщение в диалоговом окне, ожидает нажатия
пользователем одной из кнопок и возвращает в переменную VBA целое значение,
соответствующее нажатой кнопке. При использовании одного аргумента выводит
значения переменных VBA и текстовые сообщения.