以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]三击表报错 如何处理 版主大人来看看啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99991)
--  作者：西瓜住持
--  发布时间：2017/5/2 14:43:00
--  [求助]三击表报错 如何处理 版主大人来看看啊
双击表A,打开一个窗口，窗口里有一个TABLE      窗口_Table1 
为了避免重复加载 窗口_Table1  导致的报错，使用了下列代码在双击时对 窗口_Table1  执行一次卸载

If  DataTables.Contains("窗口_Table1")   Then
                    DataTables.Unload("窗口_Table1")
End If

然后问题出现了，如果不是双击，而是连点了3次鼠标，会导致重复卸载，一样还是报错，版主大神帮忙看看如何处理？
[此贴子已经被作者于2017/5/2 15:02:32编辑过]
--  作者：有点色
--  发布时间：2017/5/2 15:32:00
--  

 如果是连续点击的问题，可以限制事件触发的间隔时间

 

static ptime As Date = Nothing

Dim sp As TimeSpan = Date.now - ptime
ptime = Date.now
If sp.TotalMilliseconds < 500  Then \'间隔500毫秒
    return
End If

 

msgbox("编写执行代码")

[此贴子已经被作者于2017/5/2 15:59:44编辑过]
--  作者：西瓜住持
--  发布时间：2017/5/2 15:38:00
--  
这个思路很好，谢谢版主大人