Disable cho nút lệnh

• Open FileDialog VBA Access
• Phân biệt Module và Class trong VBA

Private Sub Command9_Click()
'ListControlProps Me


Dim Ctrl As Control

    For Each Ctrl In Me.Controls
         tenControl = Ctrl.Properties("Name")
         If tenControl = "Command1" Then
            Ctrl.Enabled = False
         End If
         
    Next Ctrl

End Sub