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