サンプル Public Class SampleClass Private Shared class1Array As Class1() Private Shared singletonInstance As SampleClass ' コンストラクタです。(外部からのアクセス不可) Private Sub New() Me.LoadXmlFile() End Sub Public Shared Function GetIn…