BUG: Microsoft Excel Does Not Repaint Properly with Automation

MORE INFORMATION

Steps to Reproduce Behavior

1. Start a new Standard EXE project in Visual Basic. Form1 is created by default.
2. On the Project menu, click References, and then select the Microsoft Excel 8.0 object library. For Excel 2000, select Microsoft Excel 9.0 object library, and for Excel 2002, select the Microsoft Excel 10.0 object library.
3. Place a CommandButton on Form1.
4. Copy the following code to the Code Window of Form1:

         Private oApp As Excel.Application
   
         Private Sub Command1_Click()
            oApp.Visible = True
         End Sub
   
         Private Sub Form_Load()
            Set oApp = CreateObject("Excel.Application")
            Command1.Caption = "Show Excel"
         End Sub
   
   
   
   
         Private Sub Form_Unload(Cancel As Integer)
            Set oApp = Nothing
         End Sub
   						

5. On the Run menu, click Start, or press the F5 key to start the program.
6. Click on the Command button to make Excel visible. Close Excel by pressing the Close button on Excel's title bar, or by selecting Exit from the File menu. Now press the Visual Basic Command button again, and note that Excel does not paint itself correctly.
7. Repeat the steps again with the Command button's code modified as follows:

         Private Sub Command1_Click()
            oApp.Visible = True
            oApp.ScreenUpdating = True
         End Sub