DoEvents函数 转让控制权，以便让操作系统处理其它的事件。

语法
　　DoEvents( )

说明
　　DoEvents 函数会返回一个 Integer，以代表 Visual Basic 独立版本中打开的窗体数目，例如，Visual Basic 专业版，在其它的应用程序中，DoEvents 返回 0。

　　DoEvents 会将控制权传给操作系统。当操作系统处理完队列中的事件，并且在 SendKeys 队列中的所有键也都已送出之后，返回控制权。

　　DoEvents 对于简化诸如允许用户取消一个已启动的过程 — 例如搜寻一个文件 — 特别有用。对于长时间过程，放弃控制权最好使用定时器或通过委派任务给 ActiveX EXE 部件来完成。以后，任务还是完全独立于应用程序，多任务及时间片由操作系统来处理。

　　注意 确保以 DoEvents 放弃控制权的过程，在第一次 DoEvents 返回之前，不能再次被其他部分的代码调用；否则会产生不可预料的结果。此外，如果其它的应用程序可能会和本过程以不可预知的方式进行交互操作，那么也不要使用 DoEvents，因为此时不能放弃控制权。

DDB函数
　　返回一个 Double，指定一笔资产在一特定期间内的折旧。可使用双下落收复平衡方法或其它指定的方法进行计算。

语法
　　DDB(cost, salvage, life, period[, factor])

DDB 函数具有下列命名参数：
　　部分描述
　　cost必要。Double 指定资产的初始成本。
　　salvage必要。Double.指定使用年限结束时的资产价值。
　　life必要。Double 指定资产可用的可用年限。
　　period必要。Double 指定计算资产折旧所用的那一期间。
　　factor可选。Variant 指定收复平衡下落时的速度。如果省略的话，2（双下落方法）为缺省值。


说明
　　双下落收复平衡方法用加速利率法计算折旧。在第一段时期，折旧为最高，而在接下来的期间内降低。
　　life 和 period 参数必须用相同的单位表示。例如，如果 life 用月份表示，则 period 也必须用月份表示。所有参数都必须是正值。
　　DDB 函数使用下列公式计算在一定时期后的折旧：
　　折旧 / period = ((cost – alvage) * factor) / life