Dim testobj As testClass Set testobj = New testClass 'このタイミングでtestClassモジュールのClass_Initializeが呼び出される。