ParamValues Class

Properties

 * Value (as double)
 * ParamName (as string)

Usage Example
Private WithEvents MyRepository As New Repository

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

Dim ListOfModels As NameIdPair ListOfModels = MyRepository.GetAllModelsInfo

Dim AModel as cModel AModel = MyRepository.GetModel(ListOfModels(0).ID)

Dim ModelParameters As ParamValues ModelParameters = AModel.Parameters

Dim ModelParamName as String ModelParamVame = ModelParameters(0).ParamName

Dim ModelParamValue as Double ModelParamValue = ModelParameters(0).Value