Talk:WeibullDataSet.Message/Notes

DRAFT

Member of: SynthesisAPI.WeibullDataSet

Occurs when there is insufficient data to estimate the parameters of a distribution. The Message event can be raised by the Calculate or CalculateBestFit method (the event is raised for each distribution that is considered in the goodness-of-fit analysis; e.g., if 3 distributions are being considered and there is insufficient data to estimate the parameters of all 3, then the event is raised 3 times.)

Remarks: Instead of using the default event procedure, you can execute a custom procedure by setting the UseEvents property of the object to true. See the example below.

Syntax

_Message(ByVal msg As String, ByVal IsCritical As Boolean)

Parameters

msg

The main display label.

IsCritical

Indicates whether the message displayed is critical.

Example

The following example provides a simple demonstration on how to handle a custom event.

VBA

 'Specify a variable to handle the event. 
  Private WithEvents wds As WeibullDataSet

 Sub Main()
   'Associate the event variable with an object. 
    Set wds = New WeibullDataSet

   'Set the application to handle custom events. 
    wds.UseEvents = True

   'To raise the event, call the Calculate method without defining a data set.  
    wds.Calculate
   Msgbox("End")
 End Sub
 '---------------------------- 

 Private Sub wds_Message(ByVal Msg As String, ByVal IsCritical As Boolean)
   '<Add code here to handle the event.> 
    MsgBox ("Message event")
 End Sub