vb6 - 用 VB6 创建 OneNote 插件

Question

首先，我尝试用VB6为OneNote 2010 / 2013制作了一个非常简单的插件。

我为 Excel 和 Word 编写了类似的插件，并去掉了所有不必要的东西。

但基本上插件在 Connect.Dsr 文件中是这样的：

Option Explicit

Dim ONApp As OneNote14.Application

Private Sub AddinInstance_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant)
Set ONApp = Application
MsgBox "Conned"
End Sub

Private Sub AddinInstance_OnDisconnection(ByVal RemoveMode As AddInDesignerObjects.ext_DisconnectMode, custom() As Variant)
MsgBox "DISCONN"
End Sub

我在 .dsr 文件中做了所有必要的修改，比如我们：

AppName         =   "Microsoft OneNote"
AppVer          =   "Microsoft OneNote 14.0"
LoadName        =   "Startup"
LoadBehavior    =   3
RegLocation     =   "HKEY_CURRENT_USER\Software\Microsoft\Office\OneNote"

这些是正常操作所必需的。

诀窍如下：当我在 VB6 IDE 中运行它时，它运行良好。但是当我将它编译为 .dll 时，OneNote COM 加载项处理程序说它由于运行时错误而无法加载插件。

疯了吧？