vb调试总是提示编译错误，提示用户定义类型未定义，如图！

Toolbar控件（也就是工具条）不是VB的标准控件，而是扩展控件，默认情况下VB是不会自动加载这个控件的。你要在部件中加入Microsoft Windows Common Controls 6.0，然后双击Toolbar控件把它加入你的窗体中，然后代码中就可以用Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)了

补充说一下：Microsoft Windows Common Controls这个控件组是微软为了让程序员容易开发出与操作系统兼容的用户界面而特意开发的一套公共控件，包括选项卡、进度条、状态条、工具条、树状视图、列表试图等等。当然，这是在Win98时代开发的，跟WinXP的界面有点不协调（更不用说Win7、Win8了）。

这个是因为你MSComCTL控件没有引用导致的。按Ctrl + T键盘，勾选MSComCTL 这个OCX控件(全名：Microsoft Windows Common Controls 6.0)，ToolBar1在FORM中并不存在，把ToolBar控件添加到FORM中程序就可以通过编译了。

你需要保证这个选中部分的代码是自动生成的。

MSComctlLib.Button 改为 ComctlLib.Button