'現在位置でマウス右ボタンダウンします
Dim instance As ScreenHwnd

'Overloads
instance.mRDown()

'マウスポインタ移動後にマウス右ボタンダウンします
Dim instance As ScreenHwnd
Dim pt As System.Drawing.Point

'Overloads
instance.mRDown(pt)

'マウスポインタ移動後にマウス右ボタンダウンします
Dim instance As ScreenHwnd
Dim x As Integer
Dim y As Integer

'Overloads
instance.mRDown(x, y)

'ScreenHwndクラス mRDownメソッド

Imports System.Windows.Forms

Public Class AddIn

	Private shw As ScreenHwnd

	Public Sub New()
		shw = New ScreenHwnd()
		MessageBox.Show("実行ボタンでX:200 Y:300の位置をマウス右ボタンダウンします。")
	End Sub

	Public Sub AddIn_Start()
		shw.mRDown(200, 300)
	End Sub

End Class