[求助]控件被设为不可用,如果点击它,MsgBox提示,如何写?

dayudayu

一个控件被设为不可用,如果点击它,MsgBox提示"请先登录!", 如何写代码

我这样写,但无效,是不是设成不可用就无法获得焦点.

Private Sub ctListBar0_GotFocus()           '此控件为ctListBar,无单击事件,只有获得焦点事件

If Me.ctListBar0.Enabled = False Then
MsgBox "请先登录！", vbCritical, "提示"
End If

End Sub

一点通

控件设置为不可用时是不能获得焦点的