Add New Synthesis Resources to a Repository/VBA

Tutorial: Add a New Synthesis Resource to a Repository
Below is the VBA version of the tutorial.

VBA Sub Main Amodel cModel ModelType ModelTypeEnum ModelCategory ModelCategoryEnum ModelName String ModelParams(1) Double ModelType = ModelTypeEnum_Weibull2 ModelCategory = ModelCategoryEnum_Reliability ModelName = ModelParams(0) = 1 ModelParams(1) = 100 AModel.SetModel(ModelType, ModelCategory, ModelName, ModelParams) MyRepository Repository MyRepository.ConnectToRepository MyRepository.Project.SetCurrentProject(1) MyRepository.Model.AddModel(AModel) End Sub