ComedyCode.com
Home Categories Languages Random New Popular Links
Search 

Share This Code!
Send this code to a friend!

ComedyCode of the Week
Check out this week's highlighted snippet!

New Here?
Create an account and become a ComedyCoder today!




May 15, 2008

Good One For Opposite day

option explicit
dim getinput as string


public sub form1_load()
getinput = inputbox("So are you smart?")
if(getinput = "Yes") then
msgbox "Im clearly sure you are very stupid." & getinput
end if
if(getinput = "No") then
msgbox "You Are Smart Congratulations!"
end if
end sub

Rem lol. dont have vb compiler so its 
rem kind of lame at the moment.



Coded by: CodeSeeker
View other ComedyCode by this comedycoder.
Send this comedycoder a message.
Submitted on: March 20, 2007
Category: People & Animals
Show me more People & Animals snippets.
Programming language: Visual Basic
Show me more Visual Basic snippets.
Viewed by: 855 unique visitors


Ratings & Comments

This snippet has not yet been rated.


» Submit Code
» Login

Rate This Code!

Login or create an account.




Copyright © 2001-2004 - N-VisionIT Interactive
Website Design, Development & Hosting by N-VisionIT Interactive