当前位置:首页 > 倒计时设计大全

倒计时设计大全

时间:2023-05-08 23:20:47

时间倒计时代码

倒计时相距********还有

这是用VB写的,必须文本框上面摆放同一个label控制,如果你要运用到自己子程序里,下面还需加点长度分辨,请自己成熟:Private Sub Timer1_Timer()Dim aa As DateDim bb As Dateaa = Now '一般用现阶段时间就可以了bb = CDate("2006-11-30 11:38:33") '今后的时间Label1.Caption = Year(bb) - Year(aa) & "年" & Month(bb) - Month(aa) & "月" & Day(bb) - Day(aa) & "天" & Hour(bb) - Hour(aa) & "小的时候" & Minute(bb) - Minute(aa) & "小时" & Second(bb) - Second(aa) & "一秒"End Sub

页面有奇效|Linkweb.cn/Js|---倒计时