WeibullDataSet.UpdateCalculationProgress

Occurs when the calculation process is running. Displays messages regarding the progress of the calculations.

Syntax
_UpdateCalculationProgress(msgx_0, msgx_1, pdone, append_to, Prev_increment, Cancel)

Parameters
msgx_0
 * Required. String. The message to display.

msgx_1
 * Required. String. Additional message to display.

pdone
 * Required. Double. The percentage done, in decimal form (0.00 to 0.99).

append_to
 * Required. Boolean. Indicates whether to append pdone in the progress display at the rate of Prev_increment; otherwise, pdone will replace the value.

Prev_increment
 * Required. Double. The value of the incremental value per progress update if append_to is True. If append_to is False, this value is ignored.

Cancel
 * Required. Boolean. Indicates whether the calculation process has been cancelled.

Example
The following example provides a simple demonstration on how to customize the event procedure. VBA wds WeibullDataSet Main wds = WeibullDataSet wds.UseEvents = True wds.AddFailure(100, 1) wds.AddFailure(120, 1) wds.AddFailure(130, 1) wds.AddFailure(160, 1) wds.AddFailure(190, 1) wds.Calculate Msgbox wds_UpdateCalculationProgress( msgx_0, msgx_1 , _                                             pdone ,  append_to , _                                             Prev_increment , Cancel ) MsgBox (msgx_0)

VB.NET wds WeibullDataSet Main wds = WeibullDataSet wds.UseEvents = True wds.AddFailure(100, 1) wds.AddFailure(120, 1) wds.AddFailure(130, 1) wds.AddFailure(160, 1) wds.AddFailure(190, 1) wds.Calculate Msgbox wds_UpdateCalculationProgress(msgx_0, msgx_1 , _                                           pdone , append_to , _                                            Prev_increment ,  Cancel ) _ wds.UpdateCalculationProgress MsgBox (msgx_0)