Dim instance As ScreenHwnd
Dim returnValue As Integer

returnValue = instance.RightClient

'ScreenHwndクラス RightClientプロパティ

Imports System.Windows.Forms

Public Class AddIn

	Private shw As ScreenHwnd

	Public Sub New()
		shw = New ScreenHwnd()
		MessageBox.Show(shw.RightClient.ToString)
	End Sub

End Class