Idle类，用于判断系统是否处于闲置状态，从而可以运行一些后台程序，使用如下： 定义模块变量 dim mIdle as Idle 程序中，如Form_Load中初如化使用： Set mIdle = New Idle mIdle.IdleSeconds = 10 mIdle.Enable = True 程序中，其它地方使用： if mIdle.IsIdle then 系统闲置中，执行其它处理。 end if -Idle Clas