Dim instance As Std = New Std()
Dim returnValue As String

returnValue = instance.Platform()

'Stdクラス プロパティ Platform

Imports System.Windows.Forms

Public Class AddIn

	Public Sub New()
		Dim std As Std = New Std()
		MessageBox.Show(std.Platform())
	End Sub

End Class

'Stdクラス プロパティ Platform

Imports System.Windows.Forms

Public Class AddIn

	Private std As Std = New Std()

	Public Sub New()
		std = New Std()
	End Sub

	Public Sub AddIn_Start()
		MessageBox.Show(std.Platform())
	End Sub

End Class

'Stdクラス プロパティ Platform

Imports System.Windows.Forms

Public Class AddIn

	Private std As Std = New Std()

	Public Sub AddIn_Start()
		std = New Std()
		MessageBox.Show(std.Platform())
	End Sub

	Public Sub AddIn_Stop()
		std = Nothing
	End Sub

End Class