邓英超 发表于 2013-7-4 10:35:02

如何用VBA赋应用程序图标？

淡写轻描 发表于 2013-7-4 11:03:46

属于Toolbar 控件使用举个例子说明，在一个Toolbar控件中添加五个 Button 对象，并且向每个 Button 对象添加二个 ButtonMenu 对象。单击ButtonMenu对象时，其行为由ButtonMenuClick事件来决定。为了试验本例，在窗体中放置一个 Toolbar 控件，将代码粘贴到代码模块的声明部分。Option ExplicitPrivate Sub Toolbar1_ButtonMenuClick(ByValButtonMenu As ComctlLib.ButtonMenu)   Select Case ButtonMenu.Index   Case 1      MsgBox "Press the button."   Case 2      MsgBox "Offer some option"   End SelectEnd Sub
页: [1]
查看完整版本: 如何用VBA赋应用程序图标？