office VBA 用api做的计时器timer

office VBA中没有Timer控件，这个timer模块派上用场了！可以用在无窗体的模块中，本timer类模块，完全模拟vb自带控件，事件，属性完全与vb自带的timer控件相同，例如：mTimer.Interval = 500设置计时器时间，mTimer.Enabled = True启动计时器，mTimer.Enabled = False关闭计时器，计时器事件Private Sub mTimer_Timers()过程，完全与系统的相同