主题：我想让菜单只能按一次后就失效应该怎么做？

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

 

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

 

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

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

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

 

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

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

 

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

设置个全局的参数或是隐藏的checkbox控件，初始化时参数或控件默认为0，然后通过点击改变它的值，通过判断它的值来确定按钮是enable还是disable

e.sender.Enable = False