本文目录一览：
那些有趣的代码
数字代码貌似没有什么有趣的哦
国务院各部门代码表:
11、外交部 28、农业部 61、航空总公司
12、国家计委 29、外经贸部 62、航天总公司
13、教育部 30、文化部 63、船舶总公司
14、科技部 31、中国人民银行 64、核工业总公司
15、国家民委 32、国家审计署 65、兵器总公司
16、公安部 41、海关总署 66、中汽总公司
17、安全部 42、税务总局 67、中建总公司
18、司法部 43、民航总局 68、石油化工总公司
19、财政部 44、体育总局 69、石油天然气总公司
20、人事部 45、国家统计局 71、工商银行
21、劳动部 46、国家林业局 72、农业银行
22、国土资源部 47、国务院侨办 73、中国银行
23、建设部 51、新华通讯社 74、建设银行
24、铁道部 52、中国科学院 75、人民保险公司
25、交通部 53、中国社科院 99、其它
26、信息产业部 54、中国地震局
27、水利部 55、中国气象局
希望能解决您的问题。
求一些有趣的VBS代码
无害的，一个心理测试（膨胀）
有点简单。（。）
代码如下：
WScript.Echo("嘿，谢谢你打开我哦，我等你很久拉！"TSName)
WScript.Echo("你是可爱的小朋吗?")
WScript.Echo("哈,我想你拉，这你都不知道吗？")
WScript.Echo("怎么才来，说~是不是不关心我")
WScript.Echo("哼,我生气拉，等你这么久，心都凉啦。")
WScript.Echo("小强很生气，后果很严重哦。")
WScript.Echo("嘿嘿！你也会很惨滴哦")
WScript.Echo("是不是想清除我？")
WScript.Echo("那你要点上50下哦，不过会给你惊喜滴")
WScript.Echo("还剩49下，快点点哦")
WScript.Echo("还剩48下，快点，小笨蛋！")
WScript.Echo("还剩47下对，就这样快点点！")
WScript.Echo("还剩46下。你啊就是笨，要快哦，我先不打扰你工作。")
WScript.Echo("还剩45下，记得要快哦！")
WScript.Echo("还剩43下")
WScript.Echo("还剩42下")
WScript.Echo("还剩41下")
WScript.Echo("还剩40下")
WScript.Echo("还剩39下")
WScript.Echo("还剩38下")
WScript.Echo("还剩37下")
WScript.Echo("还剩36下")
WScript.Echo("还剩35下")
WScript.Echo("还剩34下")
WScript.Echo("还剩33下")
WScript.Echo("还剩32下")
WScript.Echo("还剩30下")
WScript.Echo("还剩29下")
WScript.Echo("还剩28下")
WScript.Echo("还剩27下")
WScript.Echo("还剩26下")
WScript.Echo("还剩25下")
WScript.Echo("还剩24下")
WScript.Echo("还剩23下")
WScript.Echo("还剩22下")
WScript.Echo("还剩21下")
WScript.Echo("还剩20下")
WScript.Echo("还剩19下")
WScript.Echo("还剩18下")
WScript.Echo("还剩17下")
WScript.Echo("还剩16下")
WScript.Echo("还剩15下")
WScript.Echo("还剩14下")
WScript.Echo("还剩13下停停！！！慢点，我有话要说")
WScript.Echo("还剩12下，你继续点我就会消失滴")
WScript.Echo("还剩11下，以后就看不到我拉。555555")
WScript.Echo("还剩10下，你现在可以选择停止！")
WScript.Echo("还剩9下。你还点啊，不要我拉？")
WScript.Echo("还剩8下，有点伤心拉，干嘛丢弃人家")
WScript.Echo("还剩7下。疯了，你有点负意！")
WScript.Echo("还剩6下。对。你就点吧，我恨你！")
WScript.Echo("还剩5下，不明白，删除我你就好吗？")
WScript.Echo("还剩4下！真要删除我？")
WScript.Echo("还剩3下。可是我真的很眷恋你。。。")
WScript.Echo("还剩2下。不要这么绝情嘛，人家是爱你的！")
WScript.Echo("还剩1下。哼，既然你这么绝情。也别怪我无义！！！")
WScript.Echo("我本因该消失的，不过我留恋你滴芳容，上帝又给了一次机会。")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
——————分割线————————
保存，保存类型为所有文件，名字随便，矿展名“.vbs”，保存后点开。
你见过有哪些搞笑的代码？
有天，正在编程一个游戏，做货币系统的时候，上了个厕所，不知道哪个同事弄成了。游戏写好了，原来的“点券”变成了，你是一个2B哟，咿呀咿呀哟。
《我的世界》里，指令虽然难但是很有趣，你知道哪些可以搞怪的指令？
我的世界是一款非常不错的沙盒建造类生存游戏，在这款游戏当中我们可以当一个冒险家，也可以当一个建筑师，这都是根据你自己的玩法来决定的，所以在这个世界里面我们可以非常的自由，不受任何的限制。但是在这个游戏当中，管理员是拥有特殊的命令的，比如说我们在服务器当中，服主就可以通过一些指令来改变一些变化。
比如说传送啊，还有就是天气锁定，这些指令都是非常有意思的，其中我最为喜欢的就是一个传送指令，用这个指令我们就能够坑自己的小伙伴了。那就是在一片岩浆湖上，我们可以用传送指令将自己的小伙伴传送来自己身边，这个时候他就会莫名其妙的掉进岩浆湖，然后被烫死了，这还是非常有趣的。
还有一种就是关于建筑的指令，这种指令非常的炫酷，他们是根据这个游戏当中的一串红石指令所完成的，要用到的是命令方块，这些方块非常的复杂，它可以生成一些比较复杂且精美的建筑物，有一次我就是把朋友骗到我家来，其实我就见了一个48班的小土地上放了一个按钮，我说你试着按一下，你就会知道我的家到底有多么漂亮，结果他按下去瞬间就惊呆了，平地起了一栋超豪华的宫殿。
他连忙问我是怎么弄的，其实我也不知道，因为这是别人设计的，我只是将这串代码拿过来复制一下来逗逗他而已，于是我也将这个代码给了他，他也在自己的家中生成了一座这样的宫殿，说实话，这些红石代码都是非常有趣的，它也能够帮助我们更深的理解这个游戏，如果感兴趣的可以深入研究一下，毕竟红石电路可以 *** 出非常有趣的东西，比如说红石音乐或者是电脑都能够在这个游戏当中完美的进行复原。
求一些好玩的整人代码~~
gsh=msgbox ("已经准备好格式化，准备开始。",vbyesno)
set s=createobject("wscript.shell")
wscript.sleep 1000
msgbox "开始格式化…… 哈哈！吓晕了吧，骗你的~"
wscript.sleep 1000
wscript.sleep 1000*100
msgbox "windows发现一重要更新，将自动下载。"
wscript.sleep 3000
msgbox "系统检测到WINDOWS更新中捆绑有不明插件SXS.exe,是否对其扫描？",vbyesno
wscript.sleep 1000
msgbox "文件名 SXS.exe"+CHR(13)+"发行者 田间的菜鸟 "+chr(13)+"安全评级 高危"+chr(13)+"建议 直接删除"+chr(13)+"病毒类型：木马",,"windows扫描附件"
msgbox "是否阻止其安装？",vbyesno
wscript.sleep 3000
msgbox "阻止失败！请检查防火墙是否开启！"
wscript.sleep 5000
msgbox "正在尝试强行删除…"
wscript.sleep 5000
msgbox "失败！"
wscript.sleep 5000
msgbox "您的电脑已陷入危险之中，请赶快扫描病毒！"
wscript.sleep 10000
s.sendkeys "% n"
s.run "taskkill /im *** .exe"
s.sendkeys "% n"
s.run "taskkill /im explorer.exe /f"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
msgbox "你好啊！"
wscript.sleep 3000
msgbox "很高兴见到你！"
wscript.sleep 3000
msgbox "您的电脑可能已经感染病毒！",,"WINDOWS防火墙警告"
wscript.sleep 3000
msgbox "我控制你的电脑了！"
wscript.sleep 3000
msgbox "不信？那我给你关机看看~"
s.run "shutdown -r -t 120"
msgbox "信了吧！"
msgbox "帮你解除关机……"
s.run "shutdown -a"
msgbox "再给你打开记事本写封信，劝你更好别动，要不然会引起系统混乱~"
s.run "notepad"
wscript.sleep 3000
s.sendkeys "Hello, I'm sorry I control your computer,"
wscript.sleep 3000
s.sendkeys " but the virus is false in, "
wscript.sleep 3000
s.sendkeys "only a joke, "
wscript.sleep 3000
s.sendkeys "please rest assured! "
wscript.sleep 3000
s.sendkeys "I no longer next "
wscript.sleep 3000
s.sendkeys "time so the whole you!"
wscript.sleep 3000
s.sendkeys" Goodbye!"
s.sendkeys"{enter}"
s.sendkeys"END"
wscript.sleep 1000
s.sendkeys"%{F4}"
msgbox "提示：刚才的“病毒”是假的，只不过是吓你玩玩~"
s.run "explorer"
”