这个有用吗，按系统日期每天将变量设为0，我没试过。
使用静态变量
我们知道，在事件代码运行过程中，普通变量的值并不会保存，下次运行事件代码时，变量会重新回到初始值。
虽然我们可以用全局变量保存值，以便下次调用，但是全局变量主要用于不同事件之间的数据交换，资源"开销"较大。
如果不需要和其它事件交换数据，仅仅是为了保存数据，以便下次运行事件代码的时候调用，那么请使用静态变量。
和普通变量一样，静态变量只能在定义它的事件代码中访问，但是静态变量的值能够保存到下次运行事件代码。
声明静态变量的语法是：
Static 变量名 As 数据类型
例如：
Static
Name As String
静态变量通常用于标记。
示例一
为了说明普通变量和静态变量的差别，请在项目事件MainTableChanged加入如下代码：
Dim
Val1 As Integer '定义一个普通变量Val1
Static Val2 AS Integer '定义一个静态变量Val2
Val1 = Val1 + 1
Val2 = Val2 + 1
MessageBox.Show("Val1 = " & Val1 & " Val2 = " & Val2)
设置完成后，反复切换主表，你会发现Val1的值始终是1，而Val2的值在每次切换主表后都会加1。
这是因为Val1是一个普通变量，虽然每次运行时也给Val1的值加上了1，但是增加后的值，并不会保存到下次运行。
而Val2是一个静态变量，每次运行给Val2的值加1，这个增加后的值会保存到下次运行，所以每次都是在上一次加1的基础上再加1。
加好友 
发短信
Post By：2011/8/2 13:04:00 [只看该作者]
