Class Myclass
　Private Sub Class_Initialize()
　　'インスタンス作成時に呼び出されるイベント
　End Sub
End Class