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

'Overloads
instance.mRUp()

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

'Overloads
instance.mRUp(pt)

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

'Overloads
instance.mRUp(x, y)

'ScreenHwndクラス mRUpメソッド

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.mRUp(200, 300)
	End Sub

End Class