読者です 読者をやめる 読者になる 読者になる

Strict On 時の AddHandler .MouseClick, New EventHandler(AddressOf ...)

Option Strict On を設定しているとき、

AddHandler .MouseClick, New EventHandler(AddressOf NotifyIcon1_MouseClick())

以下のエラーが出る場合の対処方法。

'Private Sub NotifyIcon1_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs)' のパラメーター 'e' に対して引数が指定されていません。
'Private Sub NotifyIcon1_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs)' のパラメーター 'sender' に対して引数が指定されていません。

ちなみに定義側は以下の引数を受ける。

Private Sub NotifyIcon1_MouseClick(sender As Object, e As MouseEventArgs)

  If e.Button = Windows.Forms.MouseButtons.Left Then
 …
  End If
End Sub 

 

<対処方法>

AddHandler .MouseClick, New MouseEventHandler(AddressOf NotifyIcon1_MouseClick())

 

以上