MarkOptions Example for Visual Basic

Private Sub Command35_Click()
   RasterDoc.RecognitionResultOptions

   RasterDoc.ResultOptions.MarkOptions.ColorSuspectCharacter = COL_BW
   RasterDoc.ResultOptions.MarkOptions.ColRejectionSymbol = COL_BW + COL_GRAY
   RasterDoc.ResultOptions.MarkOptions.ColMissingSymbol = COL_NONEGR
   RasterDoc.ResultOptions.MarkOptions.ColSuspectWord = COL_ORIGINAL

   RasterDoc.SetRecognitionResultOptions

   MsgBox "Separator Before Suspect Character = " + RasterDoc.ResultOptions.MarkOptions.SeparatorBeforeSuspectCharacter + Chr$(13) + _
         "Separator Before Rejection Symbol = " + RasterDoc.ResultOptions.MarkOptions.SeparatorBeforeRejectionSymbol + Chr$(13) + _
         "Separator Before Missing Symbol = " + RasterDoc.ResultOptions.MarkOptions.SeparatorBeforeMissingSymbol + Chr$(13) + _
         "Separator Start Suspect Word = " + RasterDoc.ResultOptions.MarkOptions.SeparatorStartSuspectWord + Chr$(13) + _
         "Separator End Suspect Word = " + RasterDoc.ResultOptions.MarkOptions.SeparatorEndSuspectWord + Chr$(13) + _
         "Separator Start Line = " + RasterDoc.ResultOptions.MarkOptions.SeparatorStartLine + Chr$(13) + _
         "Separator End Line = " + RasterDoc.ResultOptions.MarkOptions.SeparatorEndLine + Chr$(13) + _
         "Separator Start Table Row = " + RasterDoc.ResultOptions.MarkOptions.SeparatorStartTableRow + Chr$(13) + _
         "Separator End Table Row = " + RasterDoc.ResultOptions.MarkOptions.SeparatorEndTableRow + Chr$(13) + _
         "Separator Start Paragraph = " + RasterDoc.ResultOptions.MarkOptions.SeparatorStartParagraph + Chr$(13) + _
         "Separator End Paragraph = " + RasterDoc.ResultOptions.MarkOptions.SeparatorEndParagraph + Chr$(13) + _
         "Separator Start Zone = " + RasterDoc.ResultOptions.MarkOptions.SeparatorStartZone + Chr$(13) + _
         "Separator End Zone = " + RasterDoc.ResultOptions.MarkOptions.SeparatorEndZone + Chr$(13) + _
         "Separator Start Page = " + RasterDoc.ResultOptions.MarkOptions.SeparatorStartPage + Chr$(13) + _
         "Separator End Page = " + RasterDoc.ResultOptions.MarkOptions.SeparatorEndPage
                   
End Sub