Codejock Developer Community : Define one Toolbar - resulting in two (one empty) http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 10 Jun 2026 02:11:55 +0000 Mon, 23 May 2011 20:53:23 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=18428 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Define one Toolbar - resulting in two (one empty) : 1) Before building your toolbars,...]]> http://forum.codejock.com/forum_posts.asp?TID=18428&PID=64550&title=define-one-toolbar-resulting-in-two-one-empty#64550 Author: jpbro
Subject: 18428
Posted: 23 May 2011 at 8:53pm

1) Before building your toolbars, call CommandBarHusb.DeleteAll
2) ToolbarHusb.ShowExpandButton = False
]]> Mon, 23 May 2011 20:53:23 +0000 http://forum.codejock.com/forum_posts.asp?TID=18428&PID=64550&title=define-one-toolbar-resulting-in-two-one-empty#64550 <![CDATA[Define one Toolbar - resulting in two (one empty) : Place CommandBars control on form Add...]]> http://forum.codejock.com/forum_posts.asp?TID=18428&PID=64549&title=define-one-toolbar-resulting-in-two-one-empty#64549 Author: DaveB
Subject: 18428
Posted: 23 May 2011 at 8:33pm

Place CommandBars control on form
Add the following code in FormLoad:
 
Dim ToolbarHusb As CommandBar
    Set ToolbarHusb = CommandBarHusb.Add("Husband", xtpBarTop)
    AddButton ToolbarHusb.Controls, xtpControlButton, ID_SPOUSES_HUSB
    ' add a few more buttons
 
    CommandBarHusb.Icons.LoadBitmap App.Path & "\res\Female32.png", ID_SPOUSES_HUSB, xtpImageNormal 'Pic:4013
    'load a few more icons
 
Run the program:
 
I am getting a blank bar above the one I am defining.  Why?
 
 
Also, how do I turn off the "Add or Remove..." option?
 
VB6 ActiveX
 
DaveB
]]> Mon, 23 May 2011 20:33:24 +0000 http://forum.codejock.com/forum_posts.asp?TID=18428&PID=64549&title=define-one-toolbar-resulting-in-two-one-empty#64549