我的工程名称是：myProject 模块名称是：myModule
UserForm1是导进来的，只是一个空的窗体。
模块myModule中的程序如下：
Sub myHelp()
MsgBox "dddd"
UserForm1.Show
End Sub
Public Sub CreateToolbar()
Dim MenuGroupObject As AcadMenuGroup
Dim ToolbarObject As AcadToolbar
Dim ToolbarItemObject As AcadToolbarItem
Dim ButtonObject As AcadToolbarItem
Set MenuGroupObject = ThisDrawing.Application.MenuGroups.Item(0)
Set ToolbarObject = MenuGroupObject.Toolbars.Add("图标内容输入")
Set ButtonObject = ToolbarObject.AddToolbarButton(0, "帮助", "帮助", "-vbarun myHelp" & vbCr)
ToolbarObject.Visible = True
End Sub
程序运行到UserForm1.Show 时就出错了，提示说类型不匹配，够详细了吧？怎么办呢？
置顶卡
