BeforeAddDataRow事件
static ptime As Date = Nothing
Dim sp As TimeSpan = Date.now - ptimeIf sp.TotalSeconds <= 1 Then e.cancel = TrueElse ptime = Date.nowEnd If