以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  我想让菜单只能按一次后就失效应该怎么做?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73116)

--  作者:jinzhengbe
--  发布时间:2015/8/12 18:16:00
--  我想让菜单只能按一次后就失效应该怎么做?

我想让菜单只能按一次后就失效应该怎么做?

 

因为菜单 是要复制数据的,如果按两次,就会复制两次数据,更多次的话,就会复制更多次,这样算粗来的结果就会一直翻倍,所以想限制点击按钮的次数

 

或者有其他的解决方法也可以 指点下,非常感谢


--  作者:大红袍
--  发布时间:2015/8/12 18:40:00
--  

复制数据的时候,检查重复不就行了。


--  作者:jinzhengbe
--  发布时间:2015/8/12 18:58:00
--  

还是告诉我 限制点击次数吧

 


--  作者:游
--  发布时间:2015/8/12 19:40:00
--  

你在点击事件处理的最后,设置它的Enabled属性,不就行了。


--  作者:大红袍
--  发布时间:2015/8/12 19:47:00
--  

比如,一天只能点一次的代码

 

Dim pdate As Date = GetConfigValue("按钮1", Nothing)
If pdate <> Date.Today Then
    msgbox("可以点击")
    SaveConfigValue("按钮1", Date.Today)
Else
    msgbox("今天已经点击过了")
    e.Sender.Enabled = False
End If


--  作者:keofcn
--  发布时间:2015/8/12 23:42:00
--  
设置个全局的参数或是隐藏的checkbox控件,初始化时参数或控件默认为0,然后通过点击改变它的值,通过判断它的值来确定按钮是enable还是disable
--  作者:hanxuntx
--  发布时间:2015/8/13 8:37:00
--  
e.sender.Enable = False