Talk:WeibullDataSet.Message/Notes
Jump to navigation
Jump to search
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 following class methods:
Calculate
CalculateBestFit
(The event is raised for each distribution that is considered in the 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 following example.
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