How to handle Failed Checkboints

The requirement is, if any check point is passed/failed, we need to certain actions

Here I am using property check point and it on the basis of Pass and fail i am doing some operations.

In following code it has iterations and on each iteration i am verifying the check point.

It is working fine if check pont is passed, but  it on fail it is not moving to else condition and exits form the code and loged as checkpont failed.

How to handle failed check point?

{VB Script}

For i = 1 to NoofGridLines

If     

(aqObject.CheckProperty    (Aliases.MaximEyes.ECPMainForm.ECPPatientEncounterForm_PageView.MaximeyesDataBoundGrid_Documents.Item(i, 2), "CellValue", cmpEqual, "My Entered Test Document", False)= True) Then

Log.Message("Check Point Verified")

{ Certain Code for action Block 'A'

---

---

}

Else

Log.Message("Check Point Failed")

{ Certain Code for action Block 'B'





}

End IF

Next