Question

VB中怎样使command按钮在单击后不能再点击

也就是在但单击后command按钮中的字自动变暗，再点击也是无效的

Answer 1

Private Sub Command1_Click()
Command1.Enabled = False
End Sub
这个就是指当点击Command1时,使其按钮失效.

Answer 2

顶匿名的那个！
直接在Command1_Click里加Command1.Enabled=False就行了，因为能点的情况下.Enabled肯定是True所以不用判断。

Answer 3

Private Sub Command1_Click()
If Command1.Enabled = True Then
Command1.Enabled = False
Else
Command1.Enabled = True
End If
End Sub
祝你好运~

Answer 4

Option Explicit

Private Sub Command1_Click()
Command1.Enabled = False
End Sub