WeibullDataSet.Message

Display a message.

Method Syntax

Message( ByVal sender As WeibullDataSet, ByVal sMsg As String , ByVal AdditionalInfo As String , ByVal IsCritical As Boolean )
Called by ‘sender’ when a message should be displayed.

Parameters

sender An WeibullDataSet object

sMsg The main display label.

AdditionalInfo The remaining label.

IsCritical (This might be used to indicate which icon to display.)

Usage Example

Declare a New class that Inherits from WeibullEvents.
Override the method.

      Private Class myEvents
          Inherits WeibullEvents
           Public Overrides Sub Message(sender As WeibullDataSet, sMsg As String, AdditionalInfo As String, IsCritical As Boolean)
               MyBase.Message(sender, sMsg, AdditionalInfo, IsCritical)
                Add additional code. 
           End Sub
       End Class

Declare the WeibullDataSet.

       Dim WDS as New WeibullDataSet

Use the created myEvents class in place of the one created by the dataset.

       WDS.Events = New myEvents

Show a prompt with the respective strings. The additional code should also run.

       WEvents.Message(WDS, "Message1", "AdditionalInfo1", False)