vb按钮多次连击问题

你好，正常情况下，按钮的Enabled属性设置成false，就不会再被点击了。你可以单独建一个窗体，自己测试一下。

1、你把Enabled=false放到点击按钮最前面，一点击先触发Enabled。不要放到代码最后面。

2、如果不是上面的问题，应该就是你的程序其他代码问题，这个需要看具体代码和情况。

测试代码：新建一个窗体，加个command1按钮。下面代码command1点击后延迟5秒弹出，也就是模拟长时间运行代码。
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub Command1_Click()
    Command1.Caption = "点击按钮-5秒后可用"
    Command1.Enabled = False
    Dim iTick As Long
    iTick = GetTickCount
    While GetTickCount - iTick < 5000
        DoEvents
    Wend
    MsgBox "过5秒了，弹出窗口"
    Command1.Enabled = True
End Sub