Visio clsEventSinkライブラリ

Question

https://msdn.microsoft.com/en-us/library/office/ff767482.aspxのガイドに従ってイベントオブジェクトを作成したいとします。 clsEventSink

私はコンパイルエラーを受け取ったよう

mEventSink：ユーザー定義型が

私は、このためのライブラリを探してみましたが定義されていませんが、私はすることができません私のように、変数を作成するときに問題が発生します私に解決策を与えるソースを見つけてください。

Answer 1

すべてのコードを1つの標準モジュール、2つの別々のモジュールに入れたり、クラスモジュールの名前を正しく変更しなかったと思いますが、クラスモジュールを作成する必要がありますすなわちない標準モジュール）：初期化方法は、標準モジュールに入ると

Copy this sample code into a new class module in VBA or Visual Basic, naming the module clsEventSink. You can then use the event-sink module that follows to create an instance of the clsEventSink class and an Event object for the MouseMove event that sends notifications of event firings to the class instance.

だからIVisEventProcインタフェースを実装するコードの最初のセクション、、、クラスモジュールと第2の部分に入ります。