Dim instance As ScreenHwnd Dim returnValue As Integer returnValue = instance.LeftClient
'ScreenHwndクラス LeftClientプロパティ Imports System.Windows.Forms Public Class AddIn Private shw As ScreenHwnd Public Sub New() shw = New ScreenHwnd() MessageBox.Show(shw.LeftClient.ToString) End Sub End Class