当前位置:主页 > 资源 > 技术文章 >

用vbs做一个恶搞朋友的代码分享
栏目分类:技术文章   发布日期:2018-11-26   作者:素年    来源:未知

讲过几个表白代码,大家可以知道方法了,就是改改文字改改后缀。 对就是这么简单,今天给大家分享一个恶搞朋友的。 恶搞朋友的话音乐当然不能像前面的可以自己关闭。 代码执行玩就自动播放而且无法关闭只能听完,室友打开后慌的一批。 下面那一串就是无法关

讲过几个表白代码,大家可以知道方法了,就是改改文字改改后缀。

对就是这么简单,今天给大家分享一个恶搞朋友的。

恶搞朋友的话音乐当然不能像前面的可以自己关闭。

代码执行玩就自动播放而且无法关闭只能听完,室友打开后慌的一批。

 

下面那一串就是无法关闭的音乐。

上面是瞎胡对方的代码,当然大家可以根据自己的喜欢改。

 

msgbox("一大波病毒正在靠近...")
msgbox("缺失重要文件")
msgbox("系统出现致命错误")
msgbox("请重启电脑")
msgbox("或者找发给你的人解救")
msgbox("请我吃饭")
msgbox("请我吃饭")
msgbox("请我吃饭")
 
set player = createobject("wmplayer.ocx") 
player.url ="http://other.web.ra01.sycdn.kuwo.cn/resource/n1/2010/03/02/222380869.mp3"
do until wmp playState = 1
wsh.sleep 100
loop
 
 
音乐是我在网上找的很给力的一个系统音乐,可以达到慌的一批的效果。

相关热词:

Copyright © 2016-2020 我爱分享网 版权所有   豫ICP备16008703号-1   关于我们 | 广告合作 | 版权声明 | 意见反馈 | 联系方式 | 原创投稿 | 网站地图 |
特效 教程 资源 资讯 福利