主题：有没有方法，某按键单击后，要延时一秒后才能再次单击？

 通过时间判断，过快的点击无效即可。

static pt As Date = Nothing
Dim sp As TimeSpan = Date.Now - pt
If sp.TotalSeconds > 1 Then
    CurrentTable.AddNew
    pt = Date.Now
Else
    output.show("无效")   
End If