Talk:WeibullDataSet.Message/Notes: Difference between revisions
Jump to navigation
Jump to search
Kate Racaza (talk | contribs) No edit summary |
Kate Racaza (talk | contribs) No edit summary |
||
Line 3: | Line 3: | ||
Occurs when the <code>Calculate</code> or <code>CalculateBestFit</code> method is called but no data set has been defined or there is insufficient data to calculate the parameters of a distribution. | Occurs when the <code>Calculate</code> or <code>CalculateBestFit</code> method is called but no data set has been defined or there is insufficient data to calculate the parameters of a distribution. | ||
To handle custom events, set the <code>UseEvents</code> property of the object to True. The <code>Calculate</code> method raises the event once, when it is unable to calculate the parameters of the data. The <code>CalculateBestFit</code> method raises the event | To handle custom events, set the <code>UseEvents</code> property of the object to True. The <code>Calculate</code> method raises the event once, when it is unable to calculate the parameters of the data. The <code>CalculateBestFit</code> method raises the event for each distribution that is selected to be included in the analysis. | ||
== Syntax == | == Syntax == |
Revision as of 16:07, 11 August 2016
DRAFT
Occurs when the Calculate
or CalculateBestFit
method is called but no data set has been defined or there is insufficient data to calculate the parameters of a distribution.
To handle custom events, set the UseEvents
property of the object to True. The Calculate
method raises the event once, when it is unable to calculate the parameters of the data. The CalculateBestFit
method raises the event for each distribution that is selected to be included in the analysis.
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 ("Custom event procedure working.") End Sub