FIX: Wrong Menu Click Event After Hiding Menu (99872)

MORE INFORMATION

Steps to Reproduce Problem

1. Start Visual Basic or from the File menu, choose New Project (ALT, F, N) if Visual Basic is already running. Form1 is created by default.
2. From the menu design dialog box of Visual Basic (VB.EXE), create a set of menus using the following table as a guide:

      Caption     CtlName (or Name)  Level    Visible
      ------------------------------------------------
      &File       MnuFile              1       False
      &New        MnuFileNew           2       True
      &Edit       MnuEdit              1       False
      &Copy       MnuEditCopy          2       True
   						

3. Add two command buttons (Command1 and Command2) to the form.
4. Add the following code to your program in the appropriate places:

      Sub Command1_Click ()
         MnuFile.Visible = 0
         MnuEdit.Visible = -1
      End Sub
   
      Sub Command2_Click ()
         MnuEdit.Visible = 0
         MnuFile.Visible = -1
      End Sub
   
      Sub MnuEdit_Click ()
         Debug.Print "Edit Click"
      End Sub
   
      Sub MnuEditCopy_Click ()
         Debug.Print "Copy Click"
      End Sub
   
      Sub MnuFile_Click ()
         Debug.Print "File Click"
      End Sub
   
      Sub MnuFileNew_Click ()
         Debug.Print "New Click"
      End Sub
   						

5. From the Run menu, choose start (ALT, R, S), or press F5.
6. From the Window menu, choose debug (ALT, W, D), or press CTRL+B.
7. Click Command1. You will see the Edit menu on Form1.
8. Click the Edit menu on Form1. Then click the Copy menu. You will see Edit Click and Copy Click displayed in the Debug Window.
9. Click Command2. You will now see the File menu in place of the Edit menu on Form1.
10. Click the File menu on Form1. Then click the New menu. You will see File Click and New Click in the Debug Window.
11. Repeat steps 7 and 8. Instead of seeing Edit Click and Copy Click in the Debug Window, you will now see New Click and Copy Click in the Debug Window.