html表白弹窗,一招教你如何制作表白弹窗方法大全

抖音很火的表白整蛊是最近在抖音上非常火的一种整蛊玩法，在小哥哥或者的电脑屏幕上使用该功能表白，非常有创意也很可爱，抖音整蛊虽然只是恶搞，但是没准就碰到爱你的女孩儿了呢，抖音超火表白可能解决你的单身问题呢。

抖音表白源代码怎么用：

1.在电脑桌面用鼠标右键单击新建一个空白文本文档

2.打开新建的空白文本文档

3.输入代码，比如输入：

msgbox("做我女朋友好吗？")

msgbox("房产证写你名字...")

msgbox("保大...")

msgbox("我妈会游泳...")

msgbox("做我女朋友好不好")

4.鼠标左键点击文本左上角文件，再点击另存为

5.点击后会弹出以下窗口，文件名改成：表白示例.vbs，保存类型改为：所有文件，然后点击确定。

6.点击确定后，完成制作，电脑桌面上会显示一个vbs文件

7.鼠标左键双击单开刚才保存vbs文件，就会看到你要的效果啦。

方法一

直接在电脑上打开一个记事本

输入一下内容

asgbox(“做我女朋友好吗?”)

hsgbox("房产证上写称名”)

asgbox("保大”)

hsgbox("我妈会游泳)1

文字可以任意输入

保存在桌面上

方法二

msgbox("做我女朋友好吗?")

msgbox("房产证写你名字...")

msgbox("保大...")

msgbox("我妈会游泳..")

x=msgbox("做我女朋友好不好"，VbOkCancel)

if x=VbOk then

msgbox("爱你，么么哒")

elseif x=VbCancel then

msgbox("哼，再见")

set ws=createobject("wscript.shell")

ws.run"cmd.exe /cshutdown-s -f -t 0"

end if

相信大家肯定不满足于这么简单的弹窗，小编特意整理个搞怪的、点击不到的分享给大家，

分享一：这一段代码不同意之后，就会关闭小姐姐的电脑，可是要当心哦。

msgbox("做我女朋友好吗？")

msgbox("房产证写你名字...")

msgbox("保大...")

msgbox("我妈会游泳..")

x=msgbox("做我女朋友好不好"，VbOkCancel)

if x=VbOk then

msgbox("爱你，么么哒")

elseif x=VbCancel then

msgbox("哼，再见")

end if

分享二：超暖心的表白代码，相信小姐姐肯定会同意的啦

msgbox("我喜欢你很久了！")

x=msgbox("你喜欢我吗？",VbYesNo)

if x=VbYES then

msgbox("好巧哦！")

elseif x=VbNO then

msgbox("好难过，受伤了！")

end if

x=msgbox("做我女朋友好不好？",VbOKCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("房产证写你的名字...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("我妈会游泳...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("保大...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("我做饭...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("我洗衣服...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("我带孩子...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

x=msgbox("好吧，银行卡全给你...",VbOkCancel)

if x=VbOk then

msgbox("永远爱你，我们结婚吧，么么哒！")

elseif x=VbCancel then

msgbox("再考虑考虑呗，等你...")

end if

end if

end if

end if

end if

end if

end if

end if