WeibullDataSet.ShowCalculationProgress: Difference between revisions
Jump to navigation
Jump to search
Kate Racaza (talk | contribs) mNo edit summary |
Kate Racaza (talk | contribs) No edit summary |
||
(4 intermediate revisions by the same user not shown) | |||
Line 1: | Line 1: | ||
{{Template:API}}{{Template:APIBreadcrumb|.[[WeibullDataSet Class|WeibullDataSet]]}} | {{Template:API}}{{Template:APIBreadcrumb|.[[WeibullDataSet Class|WeibullDataSet]]}} | ||
Line 6: | Line 5: | ||
{{Template:API_EventsNote}} | |||
== Syntax == | == Syntax == | ||
Line 13: | Line 12: | ||
== Example == | == Example == | ||
The following example provides a simple demonstration on how to | The following example provides a simple demonstration on how to customize the event procedure. | ||
'''VBA''' | '''VBA''' | ||
Line 24: | Line 23: | ||
{{APIPrefix|Set}} wds = {{APIPrefix|New}} WeibullDataSet | {{APIPrefix|Set}} wds = {{APIPrefix|New}} WeibullDataSet | ||
{{APIComment|'Set the application to | {{APIComment|'Set the application to use your event procedure.}} | ||
wds.UseEvents = True | wds.UseEvents = True | ||
{{APIComment|'To | {{APIComment|'To trigger the event, analyze a data set.}} | ||
{{APIPrefix|Call}} wds.AddFailure(100, 1) | {{APIPrefix|Call}} wds.AddFailure(100, 1) | ||
{{APIPrefix|Call}} wds.AddFailure(120, 1) | {{APIPrefix|Call}} wds.AddFailure(120, 1) | ||
Line 53: | Line 52: | ||
wds = {{APIPrefix|New}} WeibullDataSet | wds = {{APIPrefix|New}} WeibullDataSet | ||
{{APIComment|'Set the application to | {{APIComment|'Set the application to use your event procedure.}} | ||
wds.UseEvents = True | wds.UseEvents = True | ||
{{APIComment|'To | {{APIComment|'To trigger the event, calculate a data set.}} | ||
wds.AddFailure(100, 1) | wds.AddFailure(100, 1) | ||
wds.AddFailure(120, 1) | wds.AddFailure(120, 1) |
Latest revision as of 23:41, 6 September 2016
Member of: SynthesisAPI.WeibullDataSet
Occurs when the calculation process is running. Displays a progress bar.
Remarks: To hide the messages or write your own code for the event procedure, set the UseEvents
property of the object to True. The event is raised by the class methods.
Syntax
_ShowCalculationProgress()
Example
The following example provides a simple demonstration on how to customize the event procedure.
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 use your event procedure. wds.UseEvents = True 'To trigger the event, analyze a data set. Call wds.AddFailure(100, 1) Call wds.AddFailure(120, 1) Call wds.AddFailure(130, 1) Call wds.AddFailure(160, 1) Call wds.AddFailure(190, 1) wds.Calculate Msgbox("End") End Sub '---------------------------- Private Sub wds_ShowCalculationProgress() '<Add code here to handle the event.> MsgBox ("ShowCalculationProgress event") End Sub
VB.NET 'Specify a variable to handle the event. Private WithEvents wds As WeibullDataSet '---------------------------- Sub Main() 'Associate the event variable with an object. wds = New WeibullDataSet 'Set the application to use your event procedure. wds.UseEvents = True 'To trigger the event, calculate a data set. wds.AddFailure(100, 1) wds.AddFailure(120, 1) wds.AddFailure(130, 1) wds.AddFailure(160, 1) wds.AddFailure(190, 1) wds.Calculate Msgbox("End") End Sub '---------------------------- Private Sub wds_ShowCalculationProgress() Handles wds.ShowCalculationProgress '<Add code here to handle the event.> MsgBox ("ShowCalculationProgress event") End Sub