System::SharedPtr<Project> project = System::MakeObject<Project>(dataDir + u"VbaProject1.mpp");
    
System::SharedPtr<VbaProject> vbaProject = project->get_VbaProject();
System::Console::WriteLine(System::String(u"Total Modules Count: ") + vbaProject->get_Modules()->get_Count());
    
System::SharedPtr<IVbaModule> vbaModule = vbaProject->get_Modules()->ToList()->idx_get(0);
System::Console::WriteLine(System::String(u"Module Name: ") + vbaModule->get_Name());
System::Console::WriteLine(System::String(u"Source Code: ") + vbaModule->get_SourceCode());