Checking existence of few fields after a selection made

[guin.anirban]

Hi Prabhat,

In that case you can use the Reporter.Filter property for not showing the failed one.

On Error Resume next

Code:

Reporter.Filter = rfDisableAll

blnVal = Object.Check (CheckPoint(""))

If (blnVal) Then

    Reporter.Filter = rfEnableAll

    Reporter.ReportEvent micPass, "Pass", ""

Else

    Reporter.Filter = rfDisableAll
    
    Reporter.ReportEvent micFail, "Fail", ""
        
End If

Reporter.Filter = rfEnableAll

On Error GoTo 0