FIX: Invalid Enum Value Causes Incompatible Binary Compatible

MORE INFORMATION

This will only affect optional default parameters that do not use valid enumerations when setting the parameter to a default value.

Steps to Reproduce Behavior

1. Start a New ActiveX EXE in Visual Basic 5.0.
2. In the General Declarations section of Class1, place the following code:

         Public sub food( Optional x as DrawModeConstants = 1)
         End Sub
   
   						

3. Select Project1 properties from the Project menu.
4. Select the Component Tab and then make sure that the Project Compatibility button is selected. Click OK.
5. Select Make Project1.exe from the File Menu. Click OK.
6. Select Project1 Properties from the Project menu.
7. Select the Component Tab and then make sure that Binary Compatibility is selected with the <path>/project1.exe file you recently created showing in the text box. Click OK.
8. Select Make Project1.exe from the File Menu. Click OK.

You will now get a dialog box that warns of incompatibilities in the declaration of the version-compatible component. This should not be occurring because you have not modified the subroutine declaration. If you continue and select "Accept," you will get another message that recommends canceling the operation.

As a workaround, if the declaration above used a valid enumeration such as the following, the error would not occur:

   Public Sub food( Optional x as DrawModeConstanst = vbBlackness)
   End Sub