Foxtable(狐表)用户栏目专家坐堂 → [分享] 按钮双击────防止连续单击的误操作


  共有14767人关注过本帖树形打印复制链接

主题:[分享] 按钮双击────防止连续单击的误操作

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
[分享] 按钮双击────防止连续单击的误操作  发帖心情 Post By:2015/3/13 15:44:00 [显示全部帖子]

按钮没有双击事件。

为了防止点击过快,造成连续多次单击的误操作,通常是用下面的方法:

Click事件

e.Sender.Enabled = False

'''其他代码

e.Sender.Enabled = True

有时其他代码执行时间太短,上面的方法还是不灵。

本案例自造一个“双击”事件,能比较好的防止多次单击的误操作。
注:管理员密码888


以下内容只有回复后才可以浏览


更多精彩内容,请看:
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=64607
[此贴子已经被作者于2015/3/13 17:49:55编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/3/13 15:51:00 [显示全部帖子]

以下是引用jialihaha在2015/3/13 15:46:00的发言:
开发者密码是多少?


暂不开放。
 
[此贴子已经被作者于2015/3/13 15:48:02编辑过]


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/3/13 15:58:00 [显示全部帖子]

双击速度因人而异,有人操作迟钝,有人手脚灵巧,根据自己的情况,设定双击速度,效果要好些。

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/3/13 16:00:00 [显示全部帖子]

以下是引用jialihaha在2015/3/13 15:57:00的发言:
这个只是一个小功能,还不给分享?

只是卖卖关子,逗逗乐,肯定会分享代码的。

[此贴子已经被作者于2015/3/13 16:00:57编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/3/13 16:03:00 [显示全部帖子]

以下是引用jialihaha在2015/3/13 15:59:00的发言:
这个windows设置不就有么?

Windows设置,针对所有操作,这个只对那一个按钮。
 
[此贴子已经被作者于2015/3/13 15:59:11编辑过]


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/3/13 16:38:00 [显示全部帖子]

以下是引用有点甜在2015/3/13 15:55:00的发言:

 使用时间控制么?瞧瞧。不就是几句简单的代码么?

 

 

static ltime As Date = Date.Now
Dim sp As TimeSpan = Date.Now - ltime

If sp.TotalSeconds > 1 Then
    Tables("表a").AddNew
    ltime = Date.Now
End If



这样也有一定作用,但是间隔很长时间,再次点击,也能新增行,就不像双击了。


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/3/13 17:52:00 [显示全部帖子]

再传一个试用版的。

 回到顶部