WeibullDataSet.UpdateCalculationProgress

Provides ability to customize the calculation progress display.

Parameters
sender An WeibullDataSet object

msgx_0 The main display label.

msgx_1 The remaining label.

pdone  The percentage, in decimal, to display. (0.00 to 0.99)

append_to If True, append pdone to the current percentage value in the progress display at the rate of Prev_increment, otherwise pdone will replace the value.

Prev_increment This is the value of the incremental value per progress update, if append_to is True. If append_to is False, this value is ignored.

Cancel This determines if the calculation can be cancelled.

Usage Example
Private Class myEvents Inherits WeibullEvents Public Overrides Sub UpdateCalculationProgress(sender As WeibullDataSet, msgx_0 As String, msgx_1 As String, pdone As Double, append_to As Boolean, Prev_increment As Long, ByRef Cancel As Boolean) MyBase.UpdateCalculationProgress(sender, msgx_0, msgx_1, pdone, append_to, Prev_increment, Cancel) MessageBox.Show("Additional overridden code here.") End Sub End Class

Dim WDS as New WeibullDataSet

WDS.Events = New myEvents

WDS.Events.UpdateCalculationProgress(WDS, "NewMessage1", "NewMessage2", 100, False, 0, True)