Vbs вывести сообщение поверх всех окон

Что то я совсем убежал вперёд и не рассказал вам про две функции диалоговых окон: MsgBox и InputBox. В этом очень небольшом уроке я и расскажу про все приблуды к этим двум функциям. Так же существуют и другие способы создания диалоговых окон, но для этого потребуются объекты WSH, о которых будет разговор в следующих уроках.

Функция MsgBox

Самая обычная функция для вывода сообщения. Конечно она сложнее, чем Echo объекта WScript, но и объект ей не нужен.
Синтаксис: MsgBox (Prompt[, Buttons][, Title][, Helpfile, Context])

Prompt — Текст сообщения.
Buttons — Выводимые кнопки и режим окна.
Title — Название окошка.
Helpfile — файл справки (*.hlp)
Context — Номер раздела справки.

Параметр Buttons может одновременно принимать несколько значений. Для того что бы их указать, используется знак «+» или просто использую сумму значений. Значения данного параметра приведены ниже.

Константы для диалоговых окон (выводимые кнопки):

vbOKOnly — Значение 0. Выводить кнопку ОК.
vbOKCancel — Значение 1. Выводить кнопки: ОК и Отмена.
vbAbortRetryIgnore — Значение 2. Выводить кнопки: Прервать, Повтор и Пропустить.
vbYesNoCancel — Значение 3. Выводить кнопки: Да, Нет и Отмена.
vbYesNo — Значение 4. Выводить кнопки: Да и Нет.
vbRetryCancel — Значение 5. Выводить кнопки: Повтор и Отмена.

Константы для диалоговых окон (выводимые значки):

vbCritical — Значение 16. Вывести значок Stop Mark.
vbQuestion — Значение 32. Вывести значок Question Mark.
vbExclamation — Значение 48. Вывести значок Exclamation Mark.
vbInformation — Значение 64. Вывести значок Information Mark.

Константы для диалоговых окон (кнопки по умолчанию):

vbDefaultButton1 — Значение 0. Первая кнопка выбирается по умолчанию.
vbDefaultButton2 — Значение 256. Вторая кнопка выбирается по умолчанию.
vbDefaultButton3 — Значение 512. Третья кнопка выбирается по умолчанию.
vbDefaultButton4 — Значение 768. Четвёртая кнопка выбирается по умолчанию.

Константы для диалоговых окон (Режим окна):

vbApplicationModal — Значение 0. Выводится в модальном режиме.
vbSystemModal — Значение 4096. Выводится в модальном режиме и располагается поверх всех приложений.

Другое:

Значение 262144 — Поверх всех окон.
Значение 524288 — Текст в окошке выводится по правому краю.

Стоит отметить, что параметр Buttons не может принимать несколько значений из одной и той же категории. Данные значения будут просто складываться. То есть, у вас не получится установить несколько наборов кнопок или иконок одновременно.

Помимо этого, функция MsgBox может возвращать результат нажатия кнопок. Его можно присвоить переменной и таким способом определить нажатую кнопку.

Возвращаемый результат нажатых кнопок (константы):

vbOK — Значение 1. Кнопка Ок.
vbCancel — Значение 2. Кнопка Отмена.
vbAbort — Значение 3. Кнопка Прервать.
vbRetry — Значение 4. Кнопка Повтор.
vbIgnore — Значение 5. Кнопка Пропустить.
vbYes — Значение 6. Кнопка Да.
vbNo — Значение 7. Кнопка Нет.

Вот другой пример с циклом Do … Loop. Окошко не исчезнет, пока вы не нажмёте на Отмена или крестик.

Функция InputBox

Данная функция VBS будет поинтересней предыдущей, так как через неё можно получить какую либо информация от пользователя.
Синтаксис: InputBox(Prompt[, Title][, Default][, Xpos][, Ypos][, Helpfile, Context])

Prompt — Текст сообщения
Title — Название, заголовок окошка.
Default — Значение по умолчанию для поля ввода. Можно использовать, как подсказку.
Xpos и Ypos — Определяют координаты верхнего, левого угла окна.
Helpfile — Путь к фалу помощи (*.hlp).
Context — Раздел файла помощи.

В пример приведу уже знакомый сценарий с объектом Dictionary:

На этом у меня всё. Оставайтесь на VBHack.Ru и вы увидите ещё много интересных статей! До новых встреч!

7 comments

Я конечно извиняюсь, за прошлые сообщения. Увидел форму, вспомнил вчерашнюю игру гугловскую, ну и решил…
В общем вы мне здорово помогли ну, с информацией.
Хороший сайт

Просто замечательно, что есть такие люди как Вы, готовые делиться знаниями.
Огромное Вам спасибо за проделанную работу.
Владимир.

Dict.CompareMode = 1
Dict.Add «Жёлтый», «Бомба взорвалась!»
Dict.Add «Красный», «Вы обезвредили бомбу!»
Dict.Add «Синий», «Бомба взорвалась!»
Dict.Add «Зелёный», «Бомба взорвалась!»

AboutBomb = InputBox(«Обнаружена бомба. Какой провод резать: жёлтый, красный, синий или зелёный??»,»Обнаружена бомба. »,»Вводить цвет провода сюда…»)
If Dict.Exists(AboutBomb) then
MsgBox Dict.Item(AboutBomb)
else
MsgBox «У тебя плохо со зрением! Такого провода нет! Бомба взорвалась. »
end if

Как поменять картинку в левом верхнем углу либо убрать ее вообще?

Источник

Как создавать диалоговые окна в Windows?

Как создавать диалоговые окна с помощью VBScript? Всем привет, в этом уроке я вам покажу, как быстро создавать диалоговые окна в Windows, с помощью которых мы так часто подшучиваем над своими коллегами. Я представлю небольшой обзор команд с пояснениями для того, чтобы вы не просто копировали диалоговые окна с сайта, а смогли сами импровизировать, одновременно обучаясь. Это будет знакомый вам по предыдущим компьютерным приколам скриптовый язык VBScript, и всё, что нам как всегда понадобится, это простой Блокнот, который мы, после заполнения кода, будем сохранять в укромном месте с расширением .vbs.

VBScript — это простой язык программирования, исполняемый в системе сценарием Windows Script Host. Легко кодируется в Блокноте, а лучше в специальных текстовых редакторах с расширенными возможностями, как например, AkelPad или Notepad ++ (они, в отличие от встроенного Блокнота, понимают русскую кодировку; выберите Кириллицу — Windows-1251). Именно эта связка сценария и скрипта используется Windows для того, чтобы создавать диалоговые окна . Это гораздо проще, чем использовать такие языки как С и С ++. Однако подробное знакомство с VBScript задачей настоящей статьи не ставилось; здесь я лишь приведу ряд конкретных примеров того как создавать диалоговые окна с более-менее осмысленным для читающего содержанием и вариантами развития событий по результатам действий.

Как создавать диалоговые окна с ошибкой?

Итак, создадим простое диалоговое окно с двумя кнопками. И создадим окно с псевдоошибкой. Откроем текстовый редактор, и создадим сообщение, в котором:

Кавычки и скобки обязательны. Значок «+» позволяет использовать в одном скрипте множественные функции окна. В поле «содержание ошибки» вы можете написать любое сообщение, которое впоследствии прочитает пользователь. А в поле «автор ошибки» напишите того, кто это сообщение якобы пришлёт. Ими могут быть сама система Windows, или сосед по офису. А может быть директор или администратор. Решать опять же вам. Останавливаться не буду, идём дальше. Вот каким будут выглядеть диалоговые окна после того, как вы сохраните документ в формате .vbs.

Поле «5+16» приказывает системе создавать диалоговые окна с ярлыком критической ошибки и двумя кнопками. Это, как видно, кнопки «повтор» и «отмена». Но как вы уже поняли, можно создавать диалоговые окна и с другими настройкам, и всё это благодаря комбинации цифр или чисел. Это — числовые выражения постоянных, отвечающие за выводимые кнопки, значки и режимы окна. Подробнее смотрим ниже:

Нажатие кнопок для указанного кода, и, конечно, числовых комбинаций ни к чему не приведёт, но вы в силах будете указать системе, сколько раз те или иные сообщения будут появляться. Для этого просмотрите статью Множественные сообщения об ошибке. Если понадобится перенести строки в диалоговых окнах, можно воспользоваться написанием скрипта в формате:

Диалоговые окна VBS: множество постоянных и переменных.

В простейшем написании скрипта именно знак «+» позволит применять сразу несколько параметров в одном скрипте. Например, для написания окна типа:

Просто повторите скрипт так:

Кстати, появление окна можно запустить по кругу, указав в скрипте команду на запуск его же по нажатию на любую из кнопок:

где скрипт.vbs и есть тот самый скрипт, лежащий, скажем, на Рабочем столе (C:\Users\1\Desktop\). При этом избавиться от окна можно будет только через Диспетчер задач. Скрипт может также содержать и какую-то другую одну или несколько команд. Например, пара вводимых переменных не просто создаст интерактивный диалог, но запустит программу. Например, браузер. Ну, или не запустит:

Источник

VBScript — Диалоговые окна

VBScript позволяет разработчикам эффективно взаимодействовать с пользователем. Это может быть окно сообщения для отображения сообщения пользователю или поле ввода, с помощью которого пользователь может вводить значения.

Функция VBScript MsgBox

Функция MsgBox отображает окно сообщения и ждет, когда пользователь нажмет кнопку, а затем действие будет выполнено на основе кнопки, нажатой пользователем.

Синтаксис

Описание параметра

Подсказка — Обязательный параметр. Строка, которая отображается в виде сообщения в диалоговом окне. Максимальная длина подсказки составляет около 1024 символов. Если сообщение распространяется более чем на строку, то мы можем разделить строки, используя символ возврата каретки (Chr (13)) или символ перевода строки (Chr (10)) между каждой строкой.

кнопки — необязательный параметр. Числовое выражение, определяющее тип отображаемых кнопок, стиль используемых значков, идентификатор кнопки по умолчанию и модальность окна сообщения. Если оставить пустым, значение по умолчанию для кнопок будет 0.

Заголовок — необязательный параметр. Строковое выражение, отображаемое в строке заголовка диалогового окна. Если заголовок оставлен пустым, имя приложения помещается в строку заголовка.

helpfile — необязательный параметр. Строковое выражение, определяющее файл справки, который используется для предоставления контекстно-зависимой справки для диалогового окна.

context — необязательный параметр Числовое выражение, обозначающее номер контекста справки, назначенный автором справки для соответствующего раздела справки. Если предоставляется контекст, также должен быть предоставлен файл справки.

Параметр Buttons может принимать любое из следующих значений:

0 vbOKOnly Отображает только кнопку ОК.

1 vbOKCancel Отображает кнопки OK и Отмена.

2 vbAbortRetryIgnore Отображает кнопки «Отмена», «Повторить» и «Игнорировать».

3 vBYesNoCancel Отображает кнопки «Да», «Нет» и «Отмена».

4 vBYesNo Отображает кнопки «Да» и «Нет».

5 vbRetryCancel Отображает кнопки «Повторить» и «Отмена».

16 vbCritical Отображает значок критического сообщения.

32 vbQuestion Отображает значок запроса предупреждения.

48 vbExclamation Отображает значок предупреждающего сообщения.

64 vbInformation Отображает значок информационного сообщения.

0 vbDefaultButton1 Первая кнопка по умолчанию.

256 vbDefaultButton2 Вторая кнопка по умолчанию.

512 vbDefaultButton3 Третья кнопка по умолчанию.

768 vbDefaultButton4 Четвертая кнопка по умолчанию.

0 vbApplicationModal Модальное приложение. Текущее приложение не будет работать, пока пользователь не ответит на окно сообщения.

4096 vbSystemModal Система модальных. Все приложения не будут работать, пока пользователь не ответит на окно сообщения.

0 vbOKOnly Отображает только кнопку ОК.

1 vbOKCancel Отображает кнопки OK и Отмена.

2 vbAbortRetryIgnore Отображает кнопки «Отмена», «Повторить» и «Игнорировать».

3 vBYesNoCancel Отображает кнопки «Да», «Нет» и «Отмена».

4 vBYesNo Отображает кнопки «Да» и «Нет».

5 vbRetryCancel Отображает кнопки «Повторить» и «Отмена».

16 vbCritical Отображает значок критического сообщения.

32 vbQuestion Отображает значок запроса предупреждения.

48 vbExclamation Отображает значок предупреждающего сообщения.

64 vbInformation Отображает значок информационного сообщения.

0 vbDefaultButton1 Первая кнопка по умолчанию.

256 vbDefaultButton2 Вторая кнопка по умолчанию.

512 vbDefaultButton3 Третья кнопка по умолчанию.

768 vbDefaultButton4 Четвертая кнопка по умолчанию.

Вышеуказанные значения логически разделены на четыре группы: первая группа (от 0 до 5) указывает кнопки, отображаемые в окне сообщения. Вторая группа (16, 32, 48, 64) описывает тип отображаемой иконки, третья группа (0, 256, 512, 768) указывает, какая кнопка должна быть по умолчанию, и четвертая группа (0, 4096). ) определяет модальность окна сообщения.

Возвращаемые значения

Функция MsgBox может возвращать одно из следующих значений:

1 — vbOK — нажата кнопка ОК

2 — vbCancel — Отмена была нажата

3 — vbAbort — нажата кнопка «Прервать»

4 — vbRetry — повторная попытка была нажата

5 — vbIgnore — щелкнули Ignore

6 — vbYes — Да нажали

7 — vbNo — нет кликали

1 — vbOK — нажата кнопка ОК

2 — vbCancel — Отмена была нажата

3 — vbAbort — нажата кнопка «Прервать»

4 — vbRetry — повторная попытка была нажата

5 — vbIgnore — щелкнули Ignore

6 — vbYes — Да нажали

7 — vbNo — нет кликали

пример

Когда приведенный выше сценарий выполняется, отображается окно сообщения, и если вы нажмете кнопку Нет, значение a будет равно 7.

Функция VBScript InputBox

Функция InputBox помогает пользователю получить значения от пользователя. После ввода значений, если пользователь нажимает кнопку OK или нажимает клавишу ВВОД на клавиатуре, функция InputBox возвращает текст в текстовое поле. Если пользователь нажимает кнопку «Отмена», функция возвращает пустую строку («»).

Синтаксис

Описание параметра

По умолчанию — необязательный параметр. Текст по умолчанию в текстовом поле, который пользователь хотел бы отобразить.

XPos — необязательный параметр. Позиция оси X, которая представляет быстрое расстояние от левой стороны экрана по горизонтали. Если оставить это поле пустым, поле ввода будет горизонтально отцентрировано.

YPos — необязательный параметр. Положение оси Y, которое представляет быстрое расстояние от левой стороны экрана по вертикали. Если оставить это поле пустым, поле ввода будет центрировано по вертикали.

helpfile — необязательный параметр. Строковое выражение, определяющее файл справки, который будет использоваться для предоставления контекстно-зависимой справки для диалогового окна.

пример

Когда вышеуказанный сценарий выполняется, отображается поле ввода и отображается введенное значение пользователем.

Источник