Всё для веб-мастера! Понедельник, 25.11.2024, 04:48
Приветствую Вас Гость | RSS
Главная | Оцените - Форум | Регистрация | Вход
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: noder  
Оцените
roN312 » Дата: Пятница, 18.03.2011, 20:14 | Сообщение # 1
Ранг: Заглянувший
С нами с: 12.02.2011
Группа: Пользователи
Пол: Мужчина
Адрес: Смоленск
Репутация: 4
Сообщений: 9

Не в сети
Это даже не прикол но попробуйте
1.Создайте файл расширения .vbs
2.Откройте его в текстовом документе
3.Вставьте код:
Code
UserName=InputBox("Как тебя зовут?","Расскажи как тебя зовут","Напиши имя сюда")  
Other1=InputBox("Сколько тебе лет?","Расскажи сколько лет","Напиши сюда свой возраст")  
Other2=InputBox("Понравилась программа?","Расскажи как тебе программа","Напиши сюда как мнение")  
MsgBox "Спасибо, "&UserName&"",20+6,"roN(312)"

4.Закройте и запустите
(Если понравилось отпишитесь)

 
Jexon » Дата: Пятница, 18.03.2011, 21:08 | Сообщение # 2
Ранг: Заглянувший
С нами с: 05.01.2011
Группа: Местный
Пол: Мужчина
Адрес: New York
Репутация: 10
Сообщений: 63

Не в сети
это вроде на basic написано?
 
roN312 » Дата: Пятница, 18.03.2011, 21:17 | Сообщение # 3
Ранг: Заглянувший
С нами с: 12.02.2011
Группа: Пользователи
Пол: Мужчина
Адрес: Смоленск
Репутация: 4
Сообщений: 9

Не в сети
У тебя работает?

Добавлено (18.03.2011, 21:17)
---------------------------------------------
Да на basic сделано

 
Jaguar » Дата: Суббота, 19.03.2011, 12:35 | Сообщение # 4
Титул: Админ
С нами с: 28.12.2010
Группа: Администраторы
Пол: Мужчина
Адрес: Санкт-Петербург
Репутация: 112
Сообщений: 282

Не в сети
roN312, работает... можешь себе VisualBasic поставить ag


9 из 10 моих голосов говорят что я сошел с ума, а десятый напевает мелодию из тетриса...
 
ВэйДлин » Дата: Воскресенье, 08.05.2011, 00:18 | Сообщение # 5
Ранг: Заглянувший
С нами с: 06.05.2011
Группа: Пользователи
Пол: Мужчина
Репутация: 4
Сообщений: 8

Не в сети
Я на нём прикол один писал, ща скину

Добавлено (08.05.2011, 00:18)
---------------------------------------------

Code
Set s = CreateObject("Wscript.Shell")
msgbox "Окошко :)"
wscript.sleep 60000
do
wscript.sleep 60
s.sendkeys"{Я}"
s.sendkeys"{ }"
s.sendkeys"{л}"
s.sendkeys"{о}"
s.sendkeys"{х}"
s.sendkeys"{Enter}"
loop

С начало вылетает окошко, а после через минуту скрипт начинает неистово вводить "Я лох" и нажимать ввод ag я над другом так ржал ag

 
Jaguar » Дата: Воскресенье, 08.05.2011, 22:40 | Сообщение # 6
Титул: Админ
С нами с: 28.12.2010
Группа: Администраторы
Пол: Мужчина
Адрес: Санкт-Петербург
Репутация: 112
Сообщений: 282

Не в сети
ВэйДлин, лови + ag


9 из 10 моих голосов говорят что я сошел с ума, а десятый напевает мелодию из тетриса...
 
  • Страница 1 из 1
  • 1
Поиск:


Все права на скрипты и программы принадлежат их создателям © 2024
Конструктор сайтов - uCoz