1、延时触发,如
static ptime As Date = NothingDim sp As TimeSpan = Date.now - ptimeptime = Date.nowIf sp.TotalMilliseconds < 5000 Then '间隔5秒点击才有效 ReturnEnd If
'本来的代码
2、afterOpenProject、currentTableChanged 等,都可以。要看你的具体需求。