程序员教你一招最不要脸的情人节表白
受新冠疫情影响,今天的这个情人节显得很特殊:不能手牵手逛街了,不能去电影院了,不能去外面吃吃喝喝了,也不能放烟花了,就连kiss都要隔着口罩…这还是有幸在一起的情侣,对于那些“被迫”异地恋的情侣来说,只能“隔空示爱”了!

说到“隔空示爱”,这可是咱们程序员的强项,不信看看这个程序员发明的表白弹窗,女生同意才能关掉,是不是很不要脸?话不多说,先看效果图:

↓↓↓

↓↓↓

↓↓↓

↓↓↓

↓↓↓

↓↓↓

↓↓↓
如果点“否”,弹出
↓↓↓

↓↓↓
点“确定”返回
↓↓↓

↓↓↓
点“是”弹出
↓↓↓

代码如下:
msgbox "我有一件事想跟你说",vbQuestion,"在吗?"
msgbox "自从第一天遇见你,我便对你难以忘怀了!"
msgbox "做我女朋友好吗?"
msgbox ("房产写你名字")
msgbox ("保大")
msgbox ("我妈会游泳")
dim j
do while j<1
Select Case msgbox("做我女朋友好吗?",68,"请郑重的回答我!")
Case 6 j=1
Case 7 msgbox("再给你一次机会")
end Select
loop
msgbox("我就知道你会同意的,哈哈哈哈!!")
使用方法:新建一个txt文档,复制以上代码,点击【文件】→【另存为】→【文件名:后缀改为 .vbs(示例:Play.vbs)】→【保存类型:所有文档】。鼠标双击即可执行。
注:代码中“ ”内的中文可任意修改为你喜欢的内容。
以上就是程序员发明的最不要脸的表白弹窗啦!当然,会敲代码的程序员的表白大招可不止这些,想学更多酷炫“撩妹”大招的朋友,可关注公众号“宝比万像培训学校”,上面有专门的情人节表白大招介绍哦!

病毒无情,人间有情!人生无常,要珍惜眼前人!爱她,就赶紧表白吧!最后祝所有看到这这里的朋友都能表白成功!,有情人终成眷属!



