ResetObjectStats 方法示例

下列示例重设调度TestSchedule中所有Event对象的统计数据。

TestSchedule.ResetObjectStats 2

下列示例重设调度TestSchedule中定时器MyTimer 的统计数据。

TestSchedule.ResetObjectStats "MyTimer"

下列示例重设调度TestSchedule中Timer对象TestTimer, TestTimer1, TestTimer2 的统计数据。

Dim objects(2) As Variant

objects(0) = "TestTimer"

objects(1) = "TestTimer1"

objects(2) = "TestTimer2"

TestSchedule.ResetObjectStats objects