VBScript のステートメント、Property Set ステートメント
オブジェクトへの参照を設定するものらしい。
Class Foo Private m_x Public Property Set x(val) Set m_x = val End Property Public Property Get x Set x = m_x End Property End Class Set x = new Foo Set x.x = new Foo MsgBox x.x.x
で「オブジェクトがありません`m_x'」のエラー…
Public ステートメントとばし