Cómo hacer una parodia de VBE

Guarde el código como un archivo con el sufijo vbs y haga doble clic en él. También puede falsificarlo:

en caso de error, reanudar a continuación

dim WSHshellA<. /p>

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c apagado -r -t 60 -c ""Llámame cerdo, no digas Yo soy El cerdo apagará tu teléfono en solo un minuto Si no lo crees, intenta... "" ", 0, verdadero

atenuar a

do while(a lt; gt; "Soy un cerdo ")

a = inputbox ("Di que soy un cerdo, no apagues el teléfono, date prisa, di " "Soy un cerdo"" ", "No lo digas", "No lo digas", 8000, 7000 )

msgbox chr(13) chr(13) chr(13) a, 0, "MsgBox"

bucle

msgbox chr(13) chr( 13) chr(13) "Solo dímelo antes"

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell .run "cmd.exe /c apagado -a", 0, verdadero

msgbox chr(13) chr(13) chr(13) "Jajajaja, qué divertido"