主题：怎么限制按钮的点击次数？

预设一个整型全局变量:点击次数

窗口的AfterLoad:

Dim btn As WinForm.Button = e.Form.Controls("Button1")
If Vars("点击次数") > 5 Then
    btn.Enabled =False
End If

按钮的Click:

Dim btn As WinForm.Button = e.Form.Controls("Button1")
If Vars("点击次数") < 6 Then

    事件代码
    Vars("点击次数") = Vars("点击次数") + 1
Else
    btn.Enabled =False
End If