BUG: ScrollBars Disappear on Mouse Move in OLE Container

ID: Q190520


The information in this article applies to:
  • Microsoft Visual Basic Learning, Professional, and Enterprise Editions for Windows, versions 5.0, 6.0
  • Microsoft Word 97 for Windows
  • Microsoft Word 2000


SYMPTOMS

When editing a Microsoft Word Document in the Microsoft Visual Basic OLE Container, the horizontal and vertical ScrollBars for the Word Document disappear on mouse movement and/or clicks.


STATUS

Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article.


MORE INFORMATION

Steps to Reproduce Behavior

  1. Start a new Standard EXE project in Visual Basic. Form1 is created by default.


  2. Add an OLE Container and a CommandButton to Form1. Click Cancel if prompted for an object type.


  3. Add the following code to Form1's code window:


  4. 
          Option Explicit
    
          Private Sub Command1_Click()
             OLE1.CreateEmbed "", "Word.Document"
             OLE1.DoVerb vbOLEUIActivate
             OLE1.SizeMode = 1
             With OLE1.object
                .ActiveWindow.DisplayVerticalScrollbar = True
                .ActiveWindow.DisplayHorizontalScrollbar = True
             End With
          End Sub 
  5. Run the project by pressing the F5 key.


  6. Click Command1 to embed a new word document in the container. The code automatically activates the document and shows the ScrollBars.


  7. Type "Hello World" in the document.


  8. Start moving the mouse around and/or click the start of the document. You should notice that the ScrollBars disappear shortly upon receiving these mouse events.



REFERENCES

For additional information, please see the following article in the Microsoft Knowledge Base:

Q147804 HOWTO: Scroll an Embedded Word 6 Document in VB OLE

Additional query words:

Keywords : kbCtrl kbVBp kbVBp500bug kbVBp600bug kbWord kbDSupport kbword2000
Version : WINDOWS:2000,5.0,6.0,97
Platform : WINDOWS
Issue type : kbbug


Last Reviewed: November 25, 1999
© 2000 Microsoft Corporation. All rights reserved. Terms of Use.