ACC: Event Procedure Disappears When a Control Is Renamed (113876)

MORE INFORMATION

Microsoft Access creates the name of the procedure in an event procedure using a combination of the control name and the event name. For example, the procedure name for an event procedure in the OnClick property of a command button control named MyButton might be MyButton_Click. The first line of the event procedure would be:

   Sub MyButton_Click ()
				

If you rename the button, the OnClick property will still have an associated event procedure, but the original event procedure will not be renamed accordingly. Instead, a new, empty event procedure will be called by the button's OnClick property.

The MyButton_Click subprocedure is still a part of the form, however. To access it in the form's module, select General in the Object box on the module toolbar, and then select MyButton_Click in the Procedure box.

Steps to Reproduce Behavior

1. Create a new form not based on any table or query.
2. Add a command button to the form. Note that Microsoft Access automatically names the button Button0.
3. In the property sheet, click the Build button for the OnClick property.
4. In the Choose Builder dialog box, click Code Builder, and then click OK. Note that Microsoft Access automatically creates the following code for the event:
   

         Sub Button0_Click ()
   
         End Sub
   						

5. Modify the event code to match the following, and then close the form module:
   

         Sub Button0_Click ()
            Msgbox "This is a test"
         End Sub
   						

6. In the property sheet, change the Name property from Button0 to MyButton.
7. Click the Build button for the OnClick property. Note that the Sub procedure you created in step 5 no longer shows in the module. Instead, a new, empty Sub procedure has been created, using the control's new name.

To restore the original event procedure, follow these steps:

1. Delete the entire Sub procedure.
2. In the Procedure box on the toolbar, select Button0_Click.
3. Change the first line of the Sub procedure from
   

         Sub Button0_Click ()
   
      to:
   
         Sub MyButton_Click ()