求一个吓人的小程序_CSS学习

资料来源：网络整理时间：2023/3/4 3:17:55 共计：3608 浏览

求一个吓人的小程序？

先做准备工作，大家可以找个无聊的恐怖故事，然后找个恐怖图片，要大！拿起你的话筒，打开录音机，对着话筒想象你最恶心的事，然后……（录的wav不要太长）。打开你的vb。先做个mainfrom然后背景黑点，弄个无聊的恐怖故事放在text中给大家看，如果喜欢还可以用timer修改text的top来移动文字。在部件中把microsoft multimedia contral6.0加上,然后在主窗体上画个mmcontrol（当然vidible要为false)。文件名不要写路径（到时把wav,copy到同一路径下就可以了）。然后在通用里，dim time as long '作为计时器,public as kaiguan (做一个开关），在form_load中time=0 kaiguan=1 主窗口里加上一个timer，interval为1000，enabled为true。然后每次把time自加一，然后用 if time =“自己定义的‘虚假退出’时间” and kaiguan=1 then 调用子窗口1‘这是一个虚假的子窗口，别人会以为这个无聊的程序结束了，其实他关掉的是一个子窗口。 kaiguan=0 '关上开关 form1.visible=false’隐藏主窗口。 endif if (time mod “自己想让恐怖画面出现的时间”）=0 then MMControl1.Command = "sound" ’你播放录的声音调用子窗口2'子窗口2当然是恐怖的东东了 time=0 '很重要的一步，否则你的程序也许会溢出错 endif 两个自窗口，第一个是一个虚假退出窗口，用来蒙骗人家，让人家以为程序结束了。第二个是用来吓人的，可以做抖动效果……，自己发挥想象吧！不要忘记用时间控件让它定时消失！关于如何隐藏，可以修改注册表或者让自己不出现在ctrl+alt+ del或者改个名字叫sysctrl什么的！呵呵，别笑我傻！本篇文章来源于黑基网-中国最大的网络安全站点原文链接： http://www.hackbase.com/tech/2004-09-29/27107.html

版权说明：
本网站凡注明“广州京杭原创”的皆为本站原创文章，如需转载请注明出处！
本网转载皆注明出处，遵循行业规范，如发现作品内容版权或其它问题的，请与我们联系处理！
欢迎扫描右侧微信二维码与我们联系。

·上一条：web前端开发常用工具有哪些_CSS学习 | ·下一条：中国水球协会官网_CSS学习