主题：[求助]

老师好！不好意思不记得上次是哪位老师告诉我的了。定义一个按钮一天只能执行一次。现在窗口中有三个按钮，下面的代码放在按钮的Enter事件中，如果执行一个，另外两个就不执行了。没放代码的没问题。请指点，谢谢！

Dim pdate As Date = GetConfigValue("上次执行日期", Nothing,)
If pdate <> Date.Today Then
    msgbox("今天未发送短消息!")
    SaveConfigValue("上次执行日期", Date.Today)
Else
    msgbox("今天已经发送一次短消息!")
    e.Sender.Enabled = False
End If

谢谢

老师，好像还是一样的。我在窗口中新增了一个按钮，设置代码，打开窗口，就提示已经执行了，不可用。

“按钮1”就是改成按钮的名称吧？

每个按钮的文字都不一样哦

打开窗口所有按钮的状态就都提示了

不能直接引用窗口中按钮的名称，一模一样的都不行，只能手工输入，否则就提示参数太多，代码错误。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目4.zip

不知道我的例子上传成功没，第一次上传例子

老师好!上传的例子看到没？