Question

Создайте программу,  которая "спрашивает" имя,  а затем,  используя это имя, приветствует программиста.Напишите программу, которая бы выводила в окне строчку: “Моя первая программа на VBScript!!!”, а ниже – кнопку ОК.

Answer 1

Вот пример программы на VBScript, которая спрашивает имя пользователя и приветствует программиста:

Dim name
name = InputBox("Введите ваше имя", "Приветствие программиста")
MsgBox "Привет, " & name & "! Добро пожаловать в мир программирования!"

Эта программа использует функцию `InputBox` для получения имени пользователя и функцию `MsgBox` для вывода приветствия. После ввода имени, программа выводит окно с приветствием, которое содержит имя пользователя.

Если вы хотите добавить вывод строки "Моя первая программа на VBScript!!!" и кнопку ОК, можно использовать функцию `MsgBox` с параметром `vbOKOnly`:

MsgBox "Моя первая программа на VBScript!!!", vbOKOnly, "Приветствие программиста"

Таким образом, полный код программы будет выглядеть следующим образом:

MsgBox "Моя первая программа на VBScript!!!", vbOKOnly, "Приветствие программиста"

При запуске этой программы будет отображено окно с текстом "Моя первая программа на VBScript!!!" и кнопкой "ОК".

Answer 2

Вот пример программы на VBScript, которая спрашивает имя и приветствует программиста:

' Создаем объект для работы с окном сообщения
Set objShell = CreateObject("WScript.Shell")

' Запрашиваем имя у пользователя
strName = InputBox("Введите ваше имя")

' Формируем приветствие
strGreeting = "Привет, " & strName & "! Добро пожаловать в мир программирования!"

' Выводим сообщение и кнопку ОК
objShell.Popup "Моя первая программа на VBScript!!!" & vbCrLf & strGreeting, , "Приветствие", vbOKOnly + vbInformation

При запуске этой программы появится окно сообщения с текстом "Моя первая программа на VBScript!!!" и приветствием, сформированным на основе введенного имени. Также в окне будет отображена кнопка "ОК".