ALTADataSet.AddSuspension

Member of: SynthesisAPI.ALTADataSet

Adds suspensions to the data set.

Syntax

.AddSuspension(Value, NumberinGroup, ByRef Stress())

.AddSuspension(Value, NumberinGroup, Stress1)

.AddSuspension(Value, NumberinGroup, Stress1, Stress2)

Parameters

Value

Required. Double. The suspension time.

NumberinGroup

Required. Integer. The number of suspended units at the time of suspension.

Stress()

Required. Object. Can be an array of numeric stress values or ALTAStressProfile objects (stress profiles apply to the cumulative damage (CD) model only).

Stress1

Required. Object. Can be a numeric stress value or an ALTAStressProfile object (stress profiles apply to the cumulative damage (CD) model only).

Stress2

Required. Object. Can be a numeric stress value or an ALTAStressProfile object (stress profiles apply to the cumulative damage (CD) model only).

Example

The following example demonstrates how to add suspensions to an ALTADataSet object.

VBA

 'Declare a new ALTADataSet object.  
  Dim ADS As New ALTADataSet
 
 'Define 2 stress types with use stress levels = 10 and 25. 
  Call ADS.AddStressDefinition("Stress1",,10)
  Call ADS.AddStressDefinition("Stress2",,25)
 
 'Add suspensions for Stress1 = 190 and Stress2 = 235. 
  Dim Stress(1) As Variant
  Stress(0) = 190
  Stress(1) = 235

  Call ADS.AddSuspension(100, 1, Stress)
  Call ADS.AddSuspension(120, 1, Stress)
  Call ADS.AddSuspension(130, 1, Stress)
  Call ADS.AddSuspension(140, 1, Stress)

VB.NET
 
 'Declare a new ALTADataSet object.  
  Dim ADS As New ALTADataSet
 
 'Define 2 stress types with use stress levels = 10 and 25. 
  ADS.AddStressDefinition("Stress1",,10)
  ADS.AddStressDefinition("Stress2",,25)

 'Add suspensions for Stress1 = 190 and Stress2 = 235. 
  ADS.AddSuspension(100, 1, 190, 235)
  ADS.AddSuspension(120, 1, 190, 235)
  ADS.AddSuspension(130, 1, 190, 235)