首先在电脑上新建一个文本文档，输入以下代码，然后保存并将后缀名改为vbs 最后用鼠标双击就会出现以下效果
do
msgbox(“做我女朋友好不好”)
msgbox(“我会做饭”)
msgbox(“爱你一辈子”)
msgbox(“带你去旅游”)
magbox(“你说啥是啥”)
msgbox(“永远爱你”)
loop
记住退出不了请在资源管理器中结束任务。
如果要整一下小伙伴可以尝试以下代码
以下是增加了强制关机的代码
do
msgbox(“做我女朋友好不好”)
msgbox(“我会做饭”)
msgbox(“爱你一辈子”)
msgbox(“带你去旅游”)
magbox(“你说啥是啥”)
msgbox(“永远爱你”)
x=msgbox(“做我女朋友好不好”,VBOKCancel)
if x=VBOK then
msgmox(“爱你，么么哒”)
elseif x=VBCancel then
msgbox(“哼，再见”)
set ws=creatobject(“wscript.shell”)
ws.run"cmd.exe/c shutdown-s-f-t 0"
end if
转载自原文链接, 如需删除请联系管理员。
原文链接：表白小程序，转载请注明来源！