イミュータブルオブジェクト

1.イミュータブルオブジェクトとは

1. クラスモジュールを作成する(ここではクラス名はClass1とする)
   
2. 以下のような感じでプログラムを作成する
   ポイント１：VBAはコンストラクタ（Class_Initializeメソッド）に引数を持たせられないので、別途init関数を作成する
   ポイント２：init関数は一度しか呼び出せないようにしておく
   

   Option Explicit '初期化済みかを保持するフィールド Private m_isInited As Boolean Private m_data1 As Integer Private m_data2 As Long ': Private Sub Class_Initialize() m_isInited = False m_data1 = 0 m_data2 = 0 End Sub 'フィールドを初期化する '2回呼び出したときはエラー（エラー番号:425）が発生します Public Sub init(ByVal data1 As Integer, ByVal data2 As Long) If m_isInited Then Call Err.Raise(425) End If m_data1 = data1 m_data2 = data2 m_isInited = True End Sub Public Property Get data1() As Integer data1 = m_data1 End Property Public Property Get data2() As Long data2 = m_data2 End Property

   
   
3. オブジェクトを生成して初期化する
   

   Dim obj As Class1 Set obj = New Class1 Call obj.init(1, 2)

2.イミュータブルオブジェクトの特徴

1. 一度オブジェクトを生成すると、フィールドを変更できない（特徴と言うか定義？） 。
2. オブジェクトをコピーしたとき、シャローコピーであってもデータが不用意に変更されることが無い。
   オブジェクトをコピーしたとき、データが不用意に変更されないようにするにはシャローコピーをする必要がありますが、しかしディープコピーはシャローコピーよりも速度が遅いです。
3. マルチスレッドプログラミングをする際、通常であれば、setterとgetterには排他制御が必要となってくるが、それが必要ない。
   まあ、そもそもVBAでマルチスレッドプログラミングができるのかだるまは良く知らないのですが、一般的には排他制御のソースを組む（※１）のは面倒くさいし、スピードが落ちます。
   

3.参考文献など