Simple Notepad Joke

29,203

72

117

Published

Introduction: 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

  • Make it Move Contest

    Make it Move Contest
  • Clocks Contest

    Clocks Contest
  • Planter Challenge

    Planter Challenge
user

We have a be nice policy.
Please be positive and constructive.

Tips

Questions

117 Comments

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

How did you figure this out? It's AWESOME!! Is there any other tricks with notepad like this?

18 replies

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)

Sorry, at the end, put " before I

Yes...there are lots of them...

googol Ha i beat it(i think)

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

ugh...INFINITE PLUS ONE!

Infinite plus infinite... beat it! ~RoAr

how about infinite times by infine!!!
I BEAT IT!!!!!!!

ummm....INFINITE x INFINITE PLUS ONE!

(INFINITE TIMES INFINITE) PLUS! (A QUADRILLION TIMES INFINITE!) Ha Ha, Ha, ``RoAr

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

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

darn cant beat that