Simple Notepad Joke

29,268

71

117

Intro: Simple Notepad Joke

Hello! I'm going to show you a simple joke with notepad.

It's based on Visual Basic Script. Visual Basic Script is is an Active Scripting language developed by Microsoft.

This will NOT HARM YOUR COMPUTER

I MADE IT TO ENTER THE APRIL FOOLS SPEED CONTEST, SO IF YOU LIKE IT PLEASE VOTE!

Step 1: Begining

Open Notepad and type this code:

dim answer
answer=MsgBox("Are you stupid?",36,"ALERT")

You can change the question ( Are you stupid?) with anything else.

Step 2: Important Part

Copy the second line several times, but be careful DO NOT copy it too much. The times you copy it depends on how many times the alert will show. I'll copy it 5 times.
You have to copy this only this line:

answer=MsgBox("Are you stupid?",36,"ALERT")

Step 3: Save

Go to File - Save as

Save your file at the Desktop with this name: DO NOT CLICK HERE.vbs

The name must end with .vbs

Step 4: The Joke

When you open the file you'll see this

It doesn't matter what you're going to click. You'll see this alert 5 times and you must click yes or no 5 times. ( this is because I copy the second line 5 times, if you copy it more times you'll have to click yes/no more times)

It's really annoying!!!!

Step 5: Change Buttons and Icons

To make your massage more realistic you can change the icons and the buttons. It's easy....you just have to change the number 36. Of course you can't change it to any number. Every icon and every button have different numbers and the number 36 (in the example) is a sum of the icon and buttons number.

Here are the numbers for the buttons:
OK button - 0
OK and Cancel buttons - 1
About, Retry, Ignore buttons - 2
Yes, No, Cancel buttons - 3
Yes, No buttons - 4
Retry, Cancel - 5

Here are the numbers for the icons:
Icon for Critical Massage (X) - 16
Icon for Warning Query (?) - 32
Icon for Warning Massage (!) - 48
Icon for Information Massage (i) - 64

Here are some examples...
a critical massage with yes/no buttons - the number for critical massage icon is 16 and the number of yes/no buttons is 4. Sum 16+4=20. Type 20 instead of 36 here:
answer=MsgBox("Are you stupid?",36,"ALERT")

the new code will look like this: answer=MsgBox("Are you stupid?",20,"ALERT")

If you don't want your massage to have an icon instead of 36 type only the number of the buttons (0,1,2,3,4 or 5)

2 People Made This Project!

Recommendations

  • Audio Contest 2018

    Audio Contest 2018
  • Furniture Contest 2018

    Furniture Contest 2018
  • Halloween Contest 2018

    Halloween Contest 2018

117 Discussions

0
None
jalalswat1986

2 years ago

if not working in Windows 7 check the link for solution

http://intrestingofworld.blogspot.com/2016/07/there-is-no-script-engine-for-file.html

0
None
fish20Kevvixx

Reply 4 years ago on Introduction

There are quite a lot. A simple one is:

dim input

msgbox("What is your name?")

input = inputbox("Please enter your name")

msgbox(I am pleased to meet you " & input)

0
None
cyrozapReCreate

Reply 9 years ago on Introduction

INFINITE AMOUNTS! MUAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHA... (Breathes) HAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHA HA!

0
None
ReCreatePKTraceur

Reply 9 years ago on Introduction

hmmmm...INFINITE TIMES INFINITE TIMES INFINITE AGAIN AND ALL OF THAT TIMES INFINITE! HA,Ha,ha...

0
None
PKTraceurReCreate

Reply 9 years ago on Introduction

A number unknown to humans, aliens, barney, and ewilhelm TIMES A number unknown to humans, aliens, barney, and ewilhelm TIMES INFINITE TIMES A number unknown to humans, aliens, barney, and ewilhelm TIMES A number unknown to humans, aliens, barney, and ewilhelm TIMES INFINITE