Red de conocimiento informático - Aprendizaje de código fuente - Cómo utilizar el código de confesión Douyin vbs

Cómo utilizar el código de confesión Douyin vbs

Parece que las confesiones de VBS en cierto vídeo son muy populares últimamente

Todas las mujeres no soportan este tipo de rutina de coqueteo

Entonces te daré ¡Se lo dicen a la mayoría de los hombres! ¡Los compatriotas comparten uno! ! Primero crea un texto vacío y luego copia y pega la línea divisoria a continuación

¡Puedes elegir tus propias palabras para reemplazar los caracteres chinos! ! ! !

——————————————Yo soy la línea divisoria——————————————

msgbox "Ajaja Jajajaja! Inesperado! "

msgbox "Déjame hacerte una pregunta sencilla primero, siempre te digo que debes saber"

const title="Ah jajajaja, debo terminarlo". . Ah"

const yourname="XXX Aniversario"

const question="Hoy es un día especial, ¿recuerdas qué día es?"

const info = "No, no, XXX lo dijo mal. Dame una pista XXXJNR"

const scend = "Tsk, tsk, tsk, ¡por qué eres tan increíble!"

dim youranswer

do

youranswer = inputbox(question, title)

si youranswer <> yourname entonces msgbox info, vbinformation+vbokonly, title

bucle hasta turespuesta = tunombre

msgbox scend, vbinformation+vbokonly, title

msgbox "Hmm, no está mal, no está mal. Parece que el imbécil Xiaobai se ha vuelto mucho más inteligente bajo la guía de su padre = = "

msgbox "Déjame hacerte otra pregunta. Si no tienes miedo de que te golpeen en la cabeza, sé bueno"

en. error reanudar siguiente

dim WSHshellA

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

WSHshellA.run "cmd.exe /c apagado - r -t 180 -c ""¿Quién es tu persona favorita? Ingresa su nombre en el cuadro a continuación; de lo contrario, serás cerrado..."" ",0 ,true

dim a

do while (a <> "Pig Wukong")

a = inputbox ("¿Quién es tu persona favorita? Introduce su nombre en el cuadro a continuación; de lo contrario, ser cerrado.. ....","Aquellos que dicen mentiras serán golpeados en la cabeza","",8000,7000)

si (un <> "Pig Wukong") entonces

msgbox "No, no, lo dije mal.

¿No te importa que mi perro haya muerto?"

end if

loop

dim WSHshell

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

WSHshell.run "cmd.exe /c Shutdown -a",0 ,true

msgbox "¡Tu apellido es Pig!" ! ! ! ! ! ! ! ! ! "

msgbox("En este caso")

msgbox("¿Quieres ser mi novia")

msgbox("No puedo negarme")

msgbox("Escribe tu nombre en el certificado de bienes raíces")

msgbox("Te mantendré con vida")

msgbox("Mi madre sabe nadar ")

msgbox("Tus piernas son largas")

msgbox("Eres hermosa")

msgbox("Tuyo es el corazón, tuyo el cuerpo también es tuyo, cada músculo abdominal es tuyo")

msgbox("Solo sé tu XXX")

hazlo mientras j<1

Selecciona caso msgbox( "Entonces, ¿cómo está tu novia?",68,"Por favor, respóndeme en serio")

Caso 6 j=1

Caso 7 msgbox("Te doy otra oportunidad ")

end Select

bucle

msgbox "Jajajaja, qué bueno"

msgbox "Debes haber borrado el nivel haciendo this"

msgbox "¡Chirrido! "

——————————————Yo soy la línea divisoria——————————————

Hecho por mano ¡La calidad es relativamente alta!

Entonces estará bien si cambias el txt a vbs

¡Cualquiera que crea que es el momento adecuado puede intentarlo!

Si no lo entiendes, serás hija de otra persona