Text Property

  • Article

Returns the recognized text as a Unicode string. Read-only String.

expression.Text

*expression   * Required. An expression that returns a Layout, Word, or IMiSelectableItem object.

Example

The following example loads a document, performs optical character recognition (OCR) on the first page, and then displays information including the first 50 characters of text from the page's OCR layout.

Sub TestText()

  Dim miDoc As MODI.Document
  Dim miLayout As MODI.Layout
  Dim strLayoutInfo As String
  
  Set miDoc = New MODI.Document
  miDoc.Create "C:\document1.tif"
  
  miDoc.Images(0).OCR
  
  Set miLayout = miDoc.Images(0).Layout
  strLayoutInfo = _
    "Language: " & miLayout.Language & vbCrLf & _
    "Number of characters: " & miLayout.NumChars & vbCrLf & _
    "Number of fonts: " & miLayout.NumFonts & vbCrLf & _
    "Number of words: " & miLayout.NumWords & vbCrLf & _
    "Beginning of text: " & Left(miLayout.Text, 50) & vbCrLf & _
    "First word of text: " & miLayout.Words(0).Text
  MsgBox strLayoutInfo, vbInformation + vbOKOnly, _
    "Layout Information"
  
  Set miLayout = Nothing
  Set miDoc = Nothing

End Sub

Applies to | IMiSelectableItem Object | Layout Object | Word Object