Added: 3 years ago
From: esproman
Views: 42,302
Sort by time | Sort by thread (beta)

Link to this comment:

Share to:

All Comments (260)

Sign In or Sign Up now to post a comment!
  • My first one worked but my 2nd one dosent work.

    Please note:Cold you please reply to tell me what the problem is please.

    Good luck

  • @clubconsoles try to rewrite the code. if it still returns an error message, reply the code to this comment pls ! : )

  • @espenotify Thanks :D

  • Norge?

  • lolololol..

    It's a Visual Basic Code!!!

  • @dhann13emon the file extension is vbs it stands for visual basic script

  • @espenotify hey i have a question

    how can i make it so that after some one clicked no then a otherr data open like the cmd bat virus :) this will be funny

    do you now what i mean ?

  • I don't have a text filler file

  • Norsk jeg ogso

  • @stoneblock12 whatever.vbs

  • Comment removed

  • i want to make a question box which loops when you click no but ends when you click yes any ideas?

  • Comment removed

  • @dazzadaman1

    i can give u the code i used if u pm me, and subscribe

  • @THeCHEESeBURGErPIZZa U FUCKING BITCH UGREEDY OSN OF A BITCH I WISH I COUKLD FUCKING KIILLLL U.. PEOPLE HAVE TO FUCKING SUBSCRIBE TO HAVE A CODE U FUCKING BITCH

  • @dazzadaman1 i think you put "loop" (without the quotations) underneath the one you want to loop

  • @kastro6789 but what if i want to loop everything? i know i'm other user but i made an error and want it loop to start if you choose wrong answer. but i put "loop" at end and "do" at start and it says there is no "do"

  • du e norsk!!!!

  • it works better with the numer 3 in the code being a 4 just to let you know

  • do this...rename it to something on desktop (recycle bin or somert), ge the icon for it...done!

  • I am from norway to ^^, (Dette er et bevis på det).

  • can you make it so when you click a button, it goes to a webpage?

  • @B8KDBNZ yeah...i got redirected to pornhub

  • can you make it even more advanced?

  • a = MsgBox("Choose yes or no",3 , "Question") ITS WRONG!!

    a = MsgBox("Choose yes or no",4 <<<<<<<<<< CHANGE IT TO 4 NOT 3 , "Question")

    AND THEN ITS A YES NO MSG

  • OMFG YOU ARE FROM NORWAY!!!!!!!!!!!!!! :D:D:D:D

  • @OnlineiHD Yeah so? I'm also from norway, no big deal.........

  • @blackstarlion Yeah it is ;)

  • Norge ;D

  • hellp me can some make a video about the yes no question but if he answers wrong shutdown the computer and if answers right then close the program

  • @eightpassinger That is impossible.

  • can you make it say some thing else?

  • with what program are u recording?

    It is verry funny btw

  • save as..?

  • @awesomesaucedgame something.vbs

  • Thanks SO muck for this video it was awsome and i made one myself!!!!!!!!!!!!!

  • if i do that, they aspect a instruction. what is a instruction?

  • you can do a quiz with that?

  • here is my script:a = MsgBox("UR a gangsta?",3 , "Question")

    if a = vbYes then

    b = MsgBox("Then **** you", , "omg")

    else

    c = MsgBox("Ok then...", , "Nice")

    End If

    NOTE:When i copied this i modified at **** well you know what word is it

  • i made one with the question "UR a gangsta?"

  • plz help me it dont work i get a error when i save and start it up as a .vbs file.

    what should i do?

  • @themark0077 what is the text in the error??

  • I'm having so much fun with this right now!

  • last time i checked, "Choosed" is not a word =.=

    you're thinking of CHOSE

  • on question how would I make the computer shutdown by click on one of the buttons?

  • Works!

  • I TRIED TO MAKE THIS FOR DAYS AND YEARS!! THANK YOU THANK YOU THANK YOU!! D;

  • "else" should be "elseif"

  • @GmodMaster14 false... it should be if you want more than 1 else:

    a = MsgBox("Choose yes or no",3 , "Question")

    if a = vbYes then

    b = MsgBox("You Choosed Yes", , "Huray")

    elseif a = vbCool

    c = MsgBox("You choosed no", , "Huray")

    else

    -

    End If

  • de norske eier as

  • how to make the errors pop up in the corner insted of in the midle?

  • @enigeto i dont think its possible :/

  • never works.

  • It ain't that advanced

  • @Sollerswins thx like I said I don't wanna take any possible risks

  • so this has absolutely NO CHANCE in the world of crashing my pc, right? I no it's a noob question, but I only have 1 laptop and it means the world to me. I don't wanna take any risks with it.

  • @Reko322 100% safe ;)

  • What does else do and how do I continue to add boxes if the else in the script stops me from doing that??

  • @GREAT1707 a = MsgBox("Choose yes or no",3 , "Question") if a = vbYes then b = MsgBox("You Choosed Yes", , "Huray") else c = MsgBox("You choosed no", , "Huray") End If d = MsgBox("Test", , "Huray") if a = vbYes then b = MsgBox("You Choosed Yes", , "Huray") else c = MsgBox("You choosed no", , "Huray") End If
  • works

  • Is there code I can write after the error codes to make the computer shutdown after going through the messages?

  • it did not work! i tried it, saved it as vbs but it says it dosent work!!!!

  • freakin AWWESOMMMME! 

  • Thanks a lot man.

  • whats the music

  • du er norsk!!!

  • @9oax eller dansk

  • y r people having comps with DIFFERENT LANGUAGES but the author is ENGLISH HOW FUCKING STUPID

  • Norge er best ! :D

  • KULT

    meine det asså!!!

  • Norsk ?

  • KULT!!!!

  • it nein not nei

  • if anyones hacking your computer change the icon and rename all of your apps to like Avg or like Virus somthing like tht and then when they click on your error which is mistakibly internet explorer or Mozzila (Vice Verca) he will panick and get off it LOL

  • tnx

  • what a soothing music..

    BUT WHY THE FUCK ARE THE PEOPLE IN THE PREVIOUS COMMENTS IS HAVING A FLAME WAR?!!

  • #1 Why are you calling me a noob?  Well, because you are

    #2 I never called you a noob in the first place. and I'm not the one giving information. Well thats cool, so?

  • wow, you are a noob and i will bet you money on that. Lets see if you can answer this question then.... How do you portFowward, What is a pr0xy server, and Whats the VB6 Code to make a Reverse Connection rat?? Exactly, Your probly Looking Them up on google fag

  • So what noob

  • Yo cant really, or there is some few options: 0 = OK button only 1 = OK and Cancel buttons 2 = Abort, Retry, and Ignore buttons 3 = Yes, No, and Cancel buttons 4 = Yes and No buttons 5 =Retry and Cancel buttons 16 =Critical Message icon 32 =Warning Query icon 48 =Warning Message icon 64 = Information Message icon 0 = First button is default 256 =Second button is default 512 = Third button is default 768 = Fourth button is default 4096 = System modal
  • @Headcrabman99 a = MsgBox("Yes No or Cancel",3+32 , "Randomest Quiz")

    if a = vbYes then

    b = MsgBox("Yes", , "Randomest Quiz")

    End if

    if a = vbNo then

    c = MsgBox("No", , "Randomest Quiz")

    End if

    if a = vbCancel then

    d = MsgBox("Cancel", , "Randomest Quiz")

    End if

  • Comment removed

  • @chris76367

    Dude i hate you noobs

  • Thanks,it realy helps me :D

  • Norsk Dritbra!!!!!

  • can i also do that so when you click yes it goes to a website or youtube or some ? please answer

  • x=msgbox("open youtube?", 3, "loL")

    if x=vbYes then

    Dim objShell

    Set objShell = CreateObject("WScript.Shell")

    objShell.Run "webistelinkhereDotAwesome"

    else

    y=msgbox("Douche!", , "lOOOOL")

    end if

  • dansker ? herrenice :)

  • Comment removed

  • @austiy12345 how?

  • Comment removed

  • a = MsgBox("RESET?",3,"RESET?")

    if a = vbyes then

    b = MsgBox("RESETING NOW", , "RESET")

    Else

    c = MsgBox("OK? BUT WE DONT CARE! RESETING NOW!", ,"RESET")

    End if

  • Youre swedish norwegian or danish?

  • norwegian

  • Comment removed

  • or keep looping

  • a = MsgBox("Shut down now?",3 , "System Shutdown")

    if a = vbYes then

    b = MsgBox("Error Memory Fragmented!", , "Error")

    else

    c = MsgBox("Too Bad Shuting Down", , "Fuck You")

    End If

    is there a way to make it really shut down?

  • @inusouta yes shutdown -s -t 30 -c "Your Message"

  • Yes but it is going to have to be a bat file .bat I dont know how to make the code but just go to my channle and watch the video happy virus and just put the shutdown -t -s How much time at the end i think

  • thnxx man

  • lol verry nice but can you make it worse?

    like first one... as a test:

    wanna blow up you pc

    yes no cancel

    i press yes then it says:

    Alright... booom ok

    after i pressed ok... can i go any further? or.... plz help me out...

  • Cooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­oooooooooooooooooooooooooooooo­ooooooooooolll

  • lol nice 1

  • it did not work

  • it didn't work

  • @murakwan29 well you have to save it as a differant file

  • @murakwan29 yea why?????

  • @murakwan29 did you save the txt file as a .vbs?

  • @murakwan29 please, learn english!

  • Great video, and cool music =o)

  • lol for some stupid reason i don't have visual basic xD

    well nice tutorial anyway -.-

  • a = MsgBox("Trojan Horse has been detected would you like to delete it?",3 , "HURRY!")

    if a = vbYes then

    b = MsgBox("Trojan Horse deleted", , "Hurray")

    else

    c = MsgBox("NOOO NOT A VIRUS!", , "X_X")

    End If

  • it works!!!!

  • Too Nice Man !!!

  • Why do I get a weird Script Base Error when I try to open it sometimes? Sometimes I can open it without a real Error.

  • For me it happens if I put The "X=" in the beggining instead of just "Msgbox". So try that and remember that there are no spaces

  • Comment removed

  • wow this helped alot thanks dude

  • good vid, best of all pop up tutorials. 5 stars!

  • your computer is in like latin but you typed in english so its ok. 5 stars.

  • It's Swedish or Norwegian. I'm Dane... Can't see the difference of these 2 languages :D

  • Yea i think it's Swedish :D

  • Its norwegian, trust me i am norwegian.

  • It' s Norwegian, I live in Norway :D

  • NiCE

  • NiCE

  • Comment removed

  • You like visual basic!

  • 2 things:

    MsgBox is case insensitive(can put msgbox)

    You can use a while loop

    while(requirement(s) split with commas)

    function 1

    ...

    function N

    Wend

  • o.O Norsk

  • do u know make more than one yes or no for example "choose yes or no!" (yes) choose yes or no again!(no) no

  • a = MsgBox("Choose yes or no",3 , "Question") if a = vbYes then b = MsgBox("You Choosed Yes", , "Huray") else c = MsgBox("You choosed no", , "Huray") End If d = MsgBox("Choose yes or no",3 , "Question") if d = vbYes then e = MsgBox("You Choosed Yes", , "Huray") else f = MsgBox("You choosed no", , "Huray") End If
  • Comment removed

  • ok, du ee svenne ftw! =DD

  • han e inte!!!!!!

  • cool it worked i always wanted to make diferant buttons result differently! ty

  • Thank you a lot, I've always wanted to branch off into different options and now I can.

  • this soooo helped xD i have tons of fake error boxs on my desktop now =)

  • ITS OVAR NINETHOUSAANT!!!!111!!!oneo!!!­!!111! lol

  • how do you grey out one of the choices?

  • i dont know sry...

  • ok thanks anyway your videos are very good at describing how to do these kind of things

  • yay! ty it worked

  • is it possible to choose what the the clickable things say (subs for yes and no)

  • like the instead the button says "Yes" it says "Fubar"? (Fubar is just an example)

  • ya, that

  • i think its impossible, but

    glitchguy2453 can tell u...

  • it is possible, just not with vbs. (Visual Basic).

    it is possible with visual studio, bbut i dont even know how to use that yet.

  • curly bracket. Its called paranthasis.

  • kk thanks

  • How can you grey out the button?

  • v = wee

  • can u do it like if thay choose no it goes off but if u say yes it dusnt

    if u can how?

  • do until a=vbno

    a = msgbox("rofl", 4, "amg")

    loop

  • can you customize what the buttons say, so instead of Yes No and Cancel, you put something else?

  • nope...

  • WRONG YOU CAN HAHA

  • how ?

  • search on youtue ull find it

  • pls send link, i dont want to waste time to search for something i dont belive in...

  • you have anwerse my question THANKS

  • loool

  • Try:

    a = MsgBox("Choose yes or no",2 , "Question")

    if a = vbYes then

    b = MsgBox("You Choosed Yes", , "Huray")

    else

    c = MsgBox("You choosed no", , "Huray")

    End If

    It is with Abort , Retry and Ignore.

  • how to "choose" the "cancel" option?

    i meen, you have choosen if a=vbYES

    for cancel what? if a=vbCANCEL perhaps??

  • i'm not sure, try it :p

  • you spelled mean wrong ;)

  • kva ska eg lagre det som?

  • . vbs

  • use 4 instead of 3 4 is just yes or no and no cancel

  • lol curly bracket

  • You are norwegian, right?

  • yeh