For counter = 12 to 1 Step -1 result = 5 * counter MsgBox counter & " пять раз будет " & result Next counter Почему - без понятия,так как только начал его осваивать...
password = InputBox("Введите ваш пароль") Do Until password = "fuck" password = InputBox("Введите ваш пароль") Loop Этот пример тоже почему-то не пашет =_=
почитай, пригодится! http://pashkela.narod.ru/progi/VBSDocs.rar http://pashkela.narod.ru/progi/VBSexampl.rar