E010 イベントハンドラの引数の数は一致しません

On Event ステートメントで指定されたイベントには、指定されたイベントハンドラのシグネチャに見られるのとは異なる数のパラメータが必要です。例えば、製品のクラス Walden に対して定義された Moved イベントが 3 つのパラメータ (オブジェクト参照と 2 つの整数) を要求すると、次のようになります。

Sub GoodSub(Source As Walden, X As Integer, Y As Integer)
'...
End Sub
Sub BadArgNum(Source As Walden, X As Integer)
'...
End Sub
Dim objRefVar As New Walden("ABC")
On Event Moved From objRefVar Call GoodSub		' Legal.
On Event Moved From objRefVar Call BadArgNum		' Illegal: BadArgNum
											' has only 2 parameters,
											' but Moved requires 3.

必要な数のパラメータを持つよう、イベントハンドラの署名を変更してください。