以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  禁止多次点击  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=171893)
--  作者：charity
--  发布时间：2021/9/14 10:59:00
--  禁止多次点击
怎么防止用户在窗口重复点击按钮?
--  作者：有点蓝
--  发布时间：2021/9/14 11:10:00
--  

方法1、限制点击时间


按钮事件


static ptime As Date = Nothing

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

按钮原来的代码


2、点击后把控件设置为不可用


e.sender.enabled = false

按钮原来的代码
--  作者：charity
--  发布时间：2021/9/14 11:15:00
--  
谢谢