WeibullDataSet.UpdateCalculationProgress

Syntax
UpdateCalculationProgress(

,

,

,

,

,

,



Parameters
 * sender: A WeibullDataSet object.


 * msgx_0: The main display label.


 * msgx_1: The remaining label.


 * pdone : The percentage to display, in decimal form (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)