DOCUMENT:Q172343  13-JAN-2001  [vbwin]
TITLE   :FIX: Controls Cannot Be Added to Toolbar Programmatically
PRODUCT :Microsoft Visual Basic for Windows
PROD/VER:WINDOWS:1.0,4.0,5.0,6.0
OPER/SYS:
KEYWORDS:kbVBp kbVBp400bug kbVBp500bug kbVBp600bug kbGrpDSVB kbVS600sp3fix kbDSupport kbControl

======================================================================
-------------------------------------------------------------------------------
The information in this article applies to:

 - Microsoft Visual Basic Learning Edition for Windows, versions 5.0, 6.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
 - Microsoft Visual Basic Professional Edition for Windows, versions 5.0, 6.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
 - Microsoft Visual Basic Enterprise Edition for Windows, versions 5.0, 6.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
 - Microsoft Visual Basic Standard Edition, 32-bit, for Windows, version 4.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
 - Microsoft Visual Basic Professional Edition, 32-bit, for Windows, version 4.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
 - Microsoft Visual Basic Enterprise Edition, 32-bit, for Windows, version 4.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
 - Microsoft Visual InterDev, version 1.0, on platform(s):
    - the operating system: Microsoft Windows NT 
    - the operating system: Microsoft Windows 95 
-------------------------------------------------------------------------------

SYMPTOMS
========

With Visual Basic, you may add controls to a Toolbar control by creating a
placeholder button on the toolbar and then setting the control to the same
position. If you use the Comctl32.ocx that ships with Visual Studio 97 and
Visual Basic 5.0, or MSCOMCTL.OCX that ships with Visual Studio 6.0 and Visual
Basic 6.0, the control may unexpectedly appear behind the toolbar.

RESOLUTION
==========

To work around this problem, create a pause with DoEvents after you set all the
controls in place and then set the Toolbar control to the bottom of the ZOrder.

NOTE: This workaround does not apply to non-windowed controls, such as a Label or
a Shape. To use this workaround with non-windows controls, the controls must be
contained in a PictureBox.

STATUS
======

Microsoft has confirmed this to be a bug in the Microsoft products listed at the
beginning of this article. For Visual Studio 6.0 and Visual Basic 6.0 using
MSCOMCTL.OCX, this behavior has been resolved with Service Pack 3.

MORE INFORMATION
================

Steps to Reproduce Behavior
---------------------------

1. Start a new Visual Basic project.

2. Click Components on the Project menu and check "Microsoft Windows Common
   Controls 5.0."

3. Add a Toolbar control and a ComboBox control to Form1.

4. Add the following code to Form1:

         Private Sub Form_load()

         Dim btn As Variant

            Me.Show

            'Add a separator to the toolbar
            Toolbar1.Buttons.Add Style:=tbrSeparator

            'Add a Placeholder to the toolbar.
            Set btn = Toolbar1.Buttons.Add(Key:="ComboBox", _
               Style:=tbrPlaceholder)
            btn.Width = 2000

   'Place the combo box on top of the Placeholder

            With Combo1
               .Width = btn.Width
               .Top = btn.Top
               .Left = btn.Left
               .ZOrder 0
            End With
         End Sub

5. Press F5 to run the application. Notice that Combo1 does not appear over the
   Placeholder on Toolbar1.

6. To correct this problem, add the following code just before End Sub of the
   Form_Load event procedure:

         DoEvents
         Toolbar1.ZOrder 1

Additional query words:

======================================================================
Keywords          : kbVBp kbVBp400bug kbVBp500bug kbVBp600bug kbGrpDSVB kbVS600sp3fix kbDSupport kbControl 
Technology        : kbVBSearch kbAudDeveloper kbZNotKeyword6 kbZNotKeyword2
Version           : WINDOWS:1.0,4.0,5.0,6.0
Issue type        : kbbug
Solution Type     : kbfix

=============================================================================

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS
PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND.  MICROSOFT DISCLAIMS
ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES
OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  IN NO
EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR
ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL,
CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF
MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.  SOME STATES DO NOT ALLOW THE EXCLUSION
OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES
SO THE FOREGOING LIMITATION MAY NOT APPLY.

Copyright Microsoft Corporation 2001.