Bug with the Default property

[Mc Brain]

Follow these steps:

• Add a Frame to your form, set its enabled property to false.
• Add a button into the frame, set its default property to true.
• Add this code in the form's code:
  

  Option Explicit
   
  Private Sub Command1_Click()
      MsgBox "1"
  End Sub

• Run it.

If you try to click on the button, nothing happens because the frame is disabled. But, the button is set to be the default one, so... hit Enter. Should that MsgBox appear??

[RhinoBull]

I wouldn't consider that as a bug but this behaviour's been known for ages and not even form's KeyPreview can handle that. Best way is to subclass window's message when Enter key is pressed or reset Default property when parent container's Enabled is toggled:

Command1.Default = Frame1.Enabled