※ toolbar和excel冲突的问题，请帮忙看看

Question

环境：vb6.0+sp6、windows2000、office2003
开一个默认工程，组件添加Microsoft Windows Common Controls 6.0
引用添加Microsoft Excel 11.0 Object Library
在窗体加上一个toolbar
在form_load里面添加代码
Dim btnX As Button
Toolbar1.Buttons.Add , , , tbrSeparator
Set btnX = Toolbar1.Buttons.Add(, "open", , tbrDefault)
btnX.ToolTipText = "Open File"
btnX.Description = btnX.ToolTipText运行程序，报错“Run-time error '13' type mismatch”(运行时错误13，类型不匹配)有人遇到过吗，怎么解决的？

Answer 1

最近一直没有上来，这个问题后来我自己研究出来了，现在跟大家分享
声明时加上类库，如下面这样就可以了
Dim btnX As MSComctlLib.Button