Dim instance As StdFunc = New StdFunc()

'StdFuncクラス StdFunc コンストラクタ

Public Class AddIn

	Private stdf As StdFunc

	Public Sub New()
		stdf = New StdFunc()
	End Sub

End Class