在AfterOpenProject事件设置代码:
If _UserGroup <> "开发" Then MyTimers("计划名称").Interval = 300000Else MyTimers("计划名称").Interval = 5000End If