上一节我们学习了用Excel来实现计电子时钟的效果
虽然看起来很不错,但是很多的小伙伴就觉得有点不实用
日常工作中,计时器用处不大,倒计时反而用处更多一些,那么我们今天就来实现倒计时的功能
来看看案例
这是我们最终要实现的效果,试试很多花样呢
其实代码也没有什么难度,基本上还是延续上节我们学过的application.ontime方法
代码区
Option Explicit
Private mdteTime As Date
Private Constsdate As Date = #10/1/2021#
Private Conststime As Date = #12:00:00 AM#
Sub ks()
Call js