WAPlots Class

Creates a plot based on a fitted model in a WeibullDataSet or ALTADataSet object.

Constructors

• WAPlots Creates a new WAPlots object.

Methods

• AddDataset( WADataSet ) Adds the specified WeibullDataSet or ALTADataSet object that the plot will be based on.
• CreatePlot( WAPlotType, [WAPlotSettings], [Integer], [Integer] ) Returns a bitmap object with the specified plot. Not for use with VB6/VBA.
• CreatePlotVB6( WAPlotType, [WAPlotSettings], [Integer], [Integer] ) Returns an IPicture object with the specified plot. For VBA/VB6 only.
• Clear Removes the added WeibullDataSet/ALTADataSet object. (Required before a new data set can be added.)

Properties

• ErrorHappened (as boolean) Whether an error happened during the last plotting.
• ErrorMessage (as string) The error that happened during the last plotting. Set only if ErrorHappened is true.

Formatted Usage Example

Create a new Weibull/ALTA Plot instance. See CreatePlot for additional details.

       Dim WeibullALTAPlot As New WAPlots

Declare a WeibullDataSet. See New WeibullDataSet for additional details.

       Dim WDS As New WeibullDataSet

Add values to the raw data. See AddFailure for additional details.

       WDS.AddFailure(1, 1)
       WDS.AddFailure(2, 1)
       WDS.AddFailure(3, 1)

Add the WeibullDataSet to the WAPlots. See New WeibulDataSet for additional details.

       WeibullALTAPlot.AddDataset(WDS)

Create the WAPlot. In this example, it will create a Probability plot. See WAPlotType for additional details.

       Dim FinalPlot As Bitmap = WeibullALTAPlot.CreatePlot(WAPlotType.Probability)

If there were any issues creating the plot, ErrorHappened would be True, and ErrorString will display the reason.

       Dim ErrorString as String
       If WeibullALTAPlot.ErrorHappened Then
           ErrorString = WeibullALTAPlot.ErrorMessage
       End If