最火下载站首页
手机版
最火下载站
关注公众号
最火下载站

当前位置:首页 >资讯教程 >电脑教程 >软件教程 > 一招教你如何制作表白弹窗方法大全

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

文章作者:网友投稿 发布时间:2019-08-14 来源:网络

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

抖音表白源代码怎么用:

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

11.jpg

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

22.jpg

3.输入代码,比如输入:

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

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

msgbox("保大...")

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

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

111.png

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

44.jpg

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

55.jpg

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

66.jpg

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

1.jpg

方法一

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

输入一下内容

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

共有0条评论网友评论

当前没有评论!

加载更多

游戏排行榜