用vbs如何编写一个倒计时的程序？

zy51 2005-10-24 04:13:30

请教，在线等，马上结贴。

...全文

386 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

mynameisftb 2005-10-26

打赏
举报

回复

<script language="VBScript">
Dim oTime : oTime = 60
Function STime
document.all("oInput").value = "00:00:" & oTime
If oTime>0 Then
oTime = oTime - 1
window.setTimeout "STime", 1000
Else
MsgBox "时间到了！"
End If
End Function
Sub Window_Onload
Call STime
End Sub
</script>
<input id="oInput" type="text">

zy51 2005-10-24

打赏
举报

回复

已解决。这个板块实在是……

VB 实现倒计时自动关闭的MsgBox对话框。这种对话框对于需要在自动关闭的对话中时候，非常棒。VB 实现倒计时自动关闭的MsgBox对话框。这种对话框对于需要在自动关闭的对话中时候，非常棒。

桌面倒计时，刚开始学，自己写的，用着还顺手，感觉铃声很好听。内有源码和一个生成好的exe文件，可以直接用，也可以修改源码使功能更强大。

当晨起的朝阳拂散睡意，你满怀自信地走入考场，可否想起300天前的今天在桌前挥洒的汗水与梦中不忘的愿望；当时间一分一秒流走，你是否想起300天来西窗的烛火映照在父母的两鬓青霜；倒计时开始的一刻，意味着热血充斥着信仰，在胸中奔涌流淌；倒计时开始的一刻，学弟学妹们，用热情踏上不远的征程，用青春见证梦想的美丽绽放～高考是人生中至关重要的一关。面临高考，时间又显得是那样的宝贵。如何提醒学生珍惜宝贵的时间呢?《2012高考倒计时软件（多媒体教室高考倒计时）》由“长峰科技”专为高三师生（教室）开发，用于对指定时间进行倒数记时，倒计时可以精确到天、小时、分钟、秒，将它挂在电脑屏幕上（尤其是教室的过媒体），看着时间一分一秒地过去，刻提醒学生时间的紧迫，提醒考生珍惜时间，做好考前冲刺复习。运行中界面，功能你可以看到了（图1）嵌入桌面，不会遮挡其他应用程序窗体（图2）开机自启动。不影响桌面操作，看桌面右键菜单照常显示（图3）生肖图标日期时间农历节日节气都可显示，同时也都可以通过修改配置文件隐藏（图4.5.6）生肖图标随年份变，同时还可以自定义成自己的班徽或者企业标志如果你愿意，可以通过修改配置文件自定随机显示励志语，激励学生,可以设置励志语轮换速度。（在安装目录下有一个“励志.txt”，可以把收集的励志语保存到里面）主标题和副标题都可以自己设置，因此这个倒计时软件也就不仅仅应用与高考倒计时了，也可以做其他倒计时，普通的倒计时，下一次的奥运倒计时 倒计时时间可以自主设置，不过尽可能不要超过提前三年倒计时，比如今天2012-2-12，你尽量不要用这个程序计算2015年以后的事件，否则程序可能会不好看。桌面右下角托盘图标可以控制程序。落款灰色区域是自己的班名（河北武邑中学 0905）也可以是“六月之花这里绽放” “六月之花五班绽放”“梦想开始的地方”等个性化班名。程序没有倒计时时间限制有支持语音版的，每次启动自动播放“距2012年高考还有×××天”或者其他副标题和倒计时天的内容。语音播放倒计时程序，不过还得安装win语音库，软件太大，不值，新版去掉了，有需要的可以定制，或者直接录音也可以，只要你确定了倒计时内容就可以做了。高三百日誓师马上开始了，把这个程序放到教室电脑上，让学生每天都倍受鼓舞吧！软件持续更新，最新版本，关注www.alfeng.com或alfeng.com [ALFENG．COM] 定制各类教育教学软件，其他行业软件，专业设计制作毕业光盘，专业技术人员负责照片故事的串联构建，专业人员负责照片解说词的编写，专业的配音旁白，专业的美工技术，为你的班级留下最完美的记忆。 http://www.alfeng.com 全部显示，如果你选择了，每逢节日节气还会在农历下方显示节日，节气。 倒计时窗口不遮挡任何程序鼠标在程序的任何部位点击右键，桌面菜单都能显示出来，就好像桌面背景一样，当然这绝对不是桌面壁纸，这是程序，看到那秒了吗？每一秒都在变化，如果是每秒变换壁纸，电脑你就用不成了，耗内存不说，但是桌面就闪不停，不停的刷新啊！！！该软件占内存很小，并且不会重复运行。生肖图标和时间及农历都隐藏了。励志语隐藏了。精确的倒计时时间显示也隐藏了，这些你都也已任选。托盘图标带有右键菜单，方便的控制程序落款灰色区域是自己的班名（河北武邑中学 0905）也可以是“六月之花这里绽放” “六月之花五班绽放”“梦想开始的地方”等个性化班名。长峰倒计时 【长峰倒计时软件安装程序】【安装注意事项】 •如果安全软件弹出是否允许运行等请点击放行，主要有三部分： • 1.注册字体需用vbs • 2.加入开机启动需要允许放行 • 3.可能你在桌面解压，桌面运行程序需要安全软件同意 • 4.所有文件不能改名 • 5.在弹出的gkdjs.ini中设置参数【软件说明】修改安装目录下的gkdjs.ini可以改变计时参数修改励志.txt可以修改或增加励志格言文件位置很重要，选择你要安装到的目录为了本软件的生存，请在每天唯一一次的广告弹出后点击一下，谢谢！或者购买共享版【计时器参数】标题=高考倒计时 内容=2012年高考班级=河北武邑中学 0905班时间=2012/6/7 08:00:00 徽标= 显示日期和时间=是显示节日和节气=是显示生肖图标=是显示励志标语=是励志语时间间隔=30 显示精确倒计时=是长峰科技 http://alfeng.com Email:mytoday2004@163.com QQ:360321969 http://phyedu.ys168.com

整人程序代码大全 VBS语言整人程序代码大全.pdf 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下。你啊就是笨，要快哦，我先不打扰 ............. .............

vbs自动关机脚本。单位：分钟，取消可以运行取消自动关机

4,007

社区成员

3,512

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章