Repository.Model.AddModel

Syntax

 * AddModel( m cModel )

Parameters
 * m: The cModel to add.

Usage Example
Private WithEvents MyRepository As New Repository

Dim Success As Boolean = False Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")

Dim newModel As New cModel(ModelTypeEnum.Weibull2, ModelCategoryEnum.Reliability, "NewModel1", 1, 100)

Dim SuccessAddModel As Boolean = False SuccessAddModel = MyRepository.AddModel(newModel)