我想设计个倒计时得程序 应该怎么弄啊?
发布网友
发布时间：2022-05-11 12:33
共3个回答
热心网友
时间：2023-10-12 13:35
说明: 用来生成倒计时JS代码的脚本
效果: 点这里在新窗口中看效果！
代码: 要完成此效果需要两个步骤
第一步：把如下代码加入到<head>区域中
<SCRIPT language=javascript>
<!--
function generate(form){
for(var q=0;q<12;q++){
if(document.me.m.options[document.me.m.selectedIndex].value==q){
var m2=q+1
}
var txt='<!-- 要完成此效果需要三个步骤:\r\n\r\n'
+' 1. 将第一部分粘贴到HTML的HEAD区\r\n'
+' 2. 将OnLoad事件加入BODY标签内\r\n'
+' 3. 将最后一部分代码加入BODY区 -->\r\n\r\n'
+'<!-- 第一步: 将如下代码加入到HEAD区域中-->\r\n\r\n'
+'<HEAD>\r\n\r\n<SCRIPT LANGUAGE="JavaScript">\r\n\r\n'
+'<!-- Begin\r\n'
+'var Temp2;\n'
+'var timerID = null;\n'
+'var timerRunning = false;\n'
+'function arry() {\n'
+'this.length = 12;\n'
+'this[0] = 31;\n'
+'this[1] = 28;\n'
+'this[2] = 31;\n'
+'this[3] = 30;\n'
+'this[4] = 31;\n'
+'this[5] = 30;\n'
+'this[6] = 31;\n'
+'this[7] = 31;\n'
+'this[8] = 30;\n'
+'this[9] = 31;\n'
+'this[10] = 30;\n'
+'this[11] = 31;\n'
+'}\n'
+'var date = new arry();\n'
+'\n'
+'function stopclock() {\n'
+'if(timerRunning)\n'
+'clearTimeout(timerID);\n'
+'timerRunning = false;\n'
+'}\n'
+'\n'
+'function startclock() {\n'
+'stopclock();\n'
+'showtime();\n'
+'}\n'
+'\n'
+'function showtime() {\n'
+'now = new Date();\n'
+'var CurMonth = now.getMonth();\n'
+'var CurDate = now.getDate();\n'
+'var CurYear = now.getFullYear();\n'
+'now = null;\n'
+'if ('+document.me.d.options[document.me.d.selectedIndex].value+'<CurDate) {\n'
+'CurDate -= date[CurMonth]; CurMonth++;\n'
+'}\n'
+'if ('+document.me.m.options[document.me.m.selectedIndex].value+' < CurMonth) {\n'
+'CurMonth -= 12; CurYear++;\n'
+'}\n'
+'\n'
+'var Yearleft = '
+document.me.y.options[document.me.y.selectedIndex].value+' - CurYear;\n'
+'var Monthleft = '
+document.me.m.options[document.me.m.selectedIndex].value+' - CurMonth;\n'
+'var Dateleft = '
+document.me.d.options[document.me.d.selectedIndex].value+' - CurDate;\n'
+'\n'
+'document.dateform.a.value = Yearleft;\n'
+'document.dateform.b.value = Monthleft;\n'
+'document.dateform.c.value = Dateleft;\n'
+'\n'
+'timerID = setTimeout("showtime()",1000);\n'
+'timerRunning = true;\n'
+'}\n'
+'/\/ End -->\r\n<\/script>\r\n'
+'<\/H'+'EAD>\r\n\r\n'
+'<!-- 第二步：把OnLoad事件加在BODY标记里 -->\r\n\r\n'
+'<BO'+'DY Onload="startclock()">\r\n\r\n'
+'<!-- 第三步：把如下代码加入到BODY区域中 -->\r\n\r\n'
+'<form name=dateform>距离'
+m2+'/'+document.me.d.options[document.me.d.selectedIndex].value+'/'
+document.me.y.options[document.me.y.selectedIndex].value
+'还有\n'
+'<input type=text name=a size=2 value="">年\n'
+'<input type=text name=b size=2 value="">月\n'
+'<input type=text name=c size=2 value="">天\n'
+'</fo'+'rm>\r\n\r\n'
+'<'+'!-- 代码长度: 1.95 KB --'+'>'
;}document.mail.source.value=txt;document.mail.source2.value=txt;}
//-->
</SCRIPT>
第二步：把如下代码加入到<body>区域中
<div align="center">
<table border=5 bordercolor=#000000 borderlight=green>
<tr>
<td align=center><font size="4" color="#CCCC00" face="楷体_GB2312">
倒计时JS代码生成器</font>
</td>
</tr>
<tr>
<td align=center>
<form name=me>
<p>
<select name=m size=1>
<option value=0>January </option>
<option value=1>February </option>
<option value=2>March </option>
<option value=3>April </option>
<option value=4>May </option>
<option value=5>June </option>
<option value=6>July </option>
<option value=7>August </option>
<option value=8>September </option>
<option value=9>October </option>
<option value=10>November </option>
<option value=11>December </option>
</select>
<select name=d size=1>
<option value=1>1 </option>
<option value=2>2 </option>
<option value=3>3 </option>
<option value=4>4 </option>
<option value=5>5 </option>
<option value=6>6 </option>
<option value=7>7 </option>
<option value=8>8 </option>
<option value=9>9 </option>
<option value=10>10 </option>
<option value=11>11 </option>
<option value=12>12 </option>
<option value=13>13 </option>
<option value=14>14 </option>
<option value=15>15 </option>
<option value=16>16 </option>
<option value=17>17 </option>
<option value=18>18 </option>
<option value=19>19 </option>
<option value=20>20 </option>
<option value=21>21 </option>
<option value=22>22 </option>
<option value=23>23 </option>
<option value=24>24 </option>
<option value=25>25 </option>
<option value=26>26 </option>
<option value=27>27 </option>
<option value=28>28 </option>
<option value=29>29 </option>
<option value=30>30 </option>
<option value=31>31 </option>
</select>
<select name=y size=1>
<option value=1999>1999 </option>
<option value=2000>2000 </option>
<option value=2001>2001 </option>
<option value=2002>2002 </option>
<option value=2003>2003 </option>
<option value=2004>2004 </option>
<option value=2005>2005 </option>
<option value=2006>2006 </option>
<option value=2007>2007 </option>
<option value=2008>2008 </option>
<option value=2009>2009 </option>
</select><br>
<input type=button onclick=generate() value=生成代码 class=yk9>
<p></p>
</form>
<form name=mail>
<input type=hidden name=scriptname value="Countdown Creator">
<input type=hidden name=source2 value>
<table bgcolor=dedfdf border=1 cellpadding=1 width=396>
<tr>
<td align=center height=218>
<textarea name=source rows=12 cols=55 class=yk9>
</textarea>
<br><br></td>
<td></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</div>
参考资料：http://www.yy0736.com/js/18/511/008.htm
热心网友
时间：2023-10-12 13:35
还是用VB编的比较简单：
在窗体中加入一个label1、text1、timer1、command1
其中timer1的interval属性设为1000、enabled属性为false 。 代码如下：
dim s as integer
-------------------------------------------
pravate sub command1_click()
s=val(text1)
timer1.enabled=ture
end sub
----------------------------------------------
pravate sub timer1.time()
s=s-1
label1.caption=str(s)
if s=0 then timer1.enabled=false
end sub
热心网友
时间：2023-10-12 13:36
