Sub Z1() MsgBox ("Моя первая программа на VBScript!!!") End Sub В каком приложении работаешь?
молодец