This example demonstrates how the OcrComplete event can be used to inform the user of the outcome of the OCR process.
Private Sub Imgocr1_OcrComplete(ByVal Status As Integer)
If Status = 100 Then
'Display successful OCR message
MsgBox "OCR completed successfully.", , "OCR Status"
Else
'Display message indication OCR was unsuccessful and an error code
MsgBox "OCR unsuccessful; Status code = " & Str(Imgocr1.StatusCode), , "OCR Status"
End If
End Sub