title: Set a CommandBar "Popup" submenu icon dynamically
body: <p>I'm just trying to confirm this: In Office 2003, I want to create a custom submenu--what is known in CommandBar parlance as a popup (msoControlPopup)--at runtime, and set an image for it. With a CommandBarButton, this is very straightforward</p>
  
  <pre><code>Set btn1 = mnu.Controls.Add(msoControlButton, temporary:=True)
  btn1.Caption = "Btn1"
  btn1.Picture = stdole.LoadPicture("C:\temp\test.bmp")
  </code></pre>
  
  <p>But with a CommandBarPopup, or CommandBarControl of type msoControlPopup, it fails</p>
  
  <pre><code>Set sub1 = mnu.Controls.Add(msoControlPopup, temporary:=True)
  sub1.Caption = "Sub1"
      'object doesn't support this property or method for next line
  sub1.Picture = stdole.LoadPicture("C:\temp\test.bmp")
  </code></pre>
  
  <p>The msoControlPopup type doesn't seem to allow a <code>.Style</code> property either, which is how Office determines what to show--icon, text, both--on the control. I haven't found this proven yet, so am holding out a last hope that I'm doing something wrong, and there is, in fact, a way to insert an icon on a submenu at runtime.</p>
  
  <p>Thanks for any light you can shed.</p>