通过测试，发现直接运行Office2007 OCR 图文识别组件-- Microsoft Office Document Imaging进行文字识别后，结果中产生了分行符（软回车），如果把分行符替换为换行符（硬回车），那么就把识别的文字进行了分段。

请老师看一下第二段代码怎样修改？

谢谢！

图1，测试的原始图片： 

此主题相关图片如下：360截图20180628153012940.jpg

图2，直接运行Microsoft Office Document Imaging组件进行识别的结果（识别后存在软回车）： 

此主题相关图片如下：image 1.jpg

1、foxtable运用的识别代码：

Dim doc = CreateObject("MODI.Document")
doc.Create("d:\\test.jpg")
doc.OCR(2052, True, True)
Dim layout = doc.images(0).Layout
\'msgbox(layout.text)

2、识别后将软回车替换为硬回车vbcrlf？

Dim str As String = layout.text

Dim ary() = str.replace(chr(10), "").split(new Char() {chr(13),chr(11)})    \'清除段落空行

Dim ls As new List(Of String)
For Each s As String In ary    
    If s.trim() > "" Then
        ls.add(s)
    End If

    msgbox(？)
Next

这个意思？改成

Dim ary() = str.split(new Char() {chr(13),chr(11),chr(10)})    \'清除段落空行

执行下面代码，软回车是什么字符？

Dim str As String \'= layout.text
For Each s As string in str
    output.show(s & " " & asc(s))
Next

我这边测试不了。你执行这个获取到的数据是什么？