How to create a fake virus

Code:
    X=MsgBox("Message DescriptioN",button NO.+ Icon No, "Title")


eg:-
   x=msgbox("error found",1+16,"error")


Buttons No:  
  0=ok
  1=ok/cancle
  2=abort/retry/ignore
  3=yes/no/cancle
  4=yes/no
  5=retry/cancle

Icon NO:
  16=critical icon
  32=help icon
  48=warning icon
  64=information icon


Steps:
- open notepad
- now type the code written above
- type as many times as you want to get that many numbers of message
- then save the file in .vbs format .
- now it you want to trick any firends with it the jst change icon  and make it whatever you want.
    (eg google chrome every body opens intertnet when they got pc) To learn about unique icon chainging style
    go to :-http://droyalcomputertricks.blogspot.com/2016/09/how-to-create-custom-icon-for-folders.html
- now whenever you friends does that the virus alert will apper .
- which will contain your message.




THE CODE I HAVE WRITTEN ARE

                X=MsgBox("Error Opening",5+48, "Google Chrome")

                X=MsgBox("Do You want to check for problems",1+64, "Google Chrome")

                X=MsgBox("collecting data !!!!!  Do Yow want to continue.",1+64, "Google Chorme")

                X=MsgBox("Analysisng Data Press Yes To Continue",3+64, "Google Chrome")

                X=MsgBox("Uploading Data To the server .......... Done Press Ok To Continue",016, "Google Chrome")

                X=MsgBox("Downloading Data From Hack server.............",0+64, "Anynomous")

                X=MsgBox("Virus Download Complete",0+64, "Virus Downloaded")

                X=MsgBox("Virus is disabling the antivirus system please hold for a while",0+64, "virus installing")

                X=MsgBox("Disable Complete",0+64, "virus Installed")

                X=MsgBox("Collecting the system information",0+64, "Virus Feeding")

                X=MsgBox("Uploading to the Hack server",0+64, "Uploading.........")

                X=MsgBox("Recived Message From hack Server. Press yes to read",4+64, "Message alert")

                X=MsgBox("Do You really want to open the Message",0+64, "MEssage Opening")

                X=MsgBox("Message COntent : Thank You for the Personal Data of yours ",0+64, "Hackers Reply")

                X=MsgBox("Corruptiong The System files",0+64, "Virus Attack ")

                X=MsgBox("System Curropted Shutting Down",0+64, "Virus Work Complete")

                X=MsgBox("Fooled You . Google chrome opens from another icon lol",0+64, "JOke")


             

                        SCREENSHOTS: