精华内容
下载资源
问答
  • VB调用Office OCR组件实现图文识别

    千次阅读 2011-12-30 11:11:06
    '在VB中,只需要不到10行代码就能够实现自已的OCR文字识别软件. '1. 添加控件,需要安装office2003, 没有安装office2003的可以从别人机子上拷贝相关文件,注册regsvr32.exe mdivwctl.dll, '控件一般在这个...

     

     

    Option Explicit

     

    '利用MS Office 2003/2007的OCR控件, 对图片进行OCR识别

    '在VB中,只需要不到10行代码就能够实现自已的OCR文字识别软件.

    '1. 添加控件,需要安装office2003, 没有安装office2003的可以从别人机子上拷贝相关文件,注册regsvr32.exe mdivwctl.dll,

    '控件一般在这个目录下:C:\Program Files\Common Files\Microsoft Shared\MODI.0, 只需要相关的几个文件就可以了, 此文件夹全部文件大概在21M左右.

    '2.工程->部件->添加这个控件:Microsoft Office Document Imaging 11.0 Type Library

    '3.需要注意的一点是,在Windows2003 Server上,如果用Office自带的识别软件,会报错:

    '  "在一页或多页上执行 OCR 不成功(未找到文本)"的错误,但用VB写的测试程序识别是正常的。

     

    'OCR的主要功能

    Private Function OCRImageFile(ByVal strImageFileName As String) As Boolean

        Dim miDoc As Object

     

     

         '初始化并加载文档

        Set miDoc = CreateObject("MODI.Document")           '创建对象

     

        miDoc.Create(strImageFileName)                      '加载图片文件

     

        Screen.MousePointer = vbHourglass                   '设置沙漏光标

     

        '识别

        Err.Clear

        miDoc.Images(0).OCR 2052, True, True

        Text1.Text = miDoc.Images(0).Layout.Text

     

        OCRImageFile = True

        Screen.MousePointer = vbArrow                       '恢复箭头光标

    End Function

     

    Private Sub cmdOCR_Click()

        Dim bolP As Boolean

        Dim strFileName as String

     

        strFileName = "c:\test.tif"

        bolP = OCRImageFile(strFileName)

    End Sub

    展开全文
  • 本软件将图象制作成点阵信息保存于字库,可以进行文字识别,典型用在游戏辅助工具的制作! SimPlugOCR.dll为文字识别组件,如果用按键精灵的放在精灵的plugin目录进行调用;VB, VC, Delphi, BCB, PB... 等开发环境...
  • 验证码识别

    2010-03-11 16:07:02
    SimPlugOCR.dll为文字识别组件,如果用按键精灵的放在精灵的plugin目录进行调用;VB, VC, Delphi, BCB, PB... 等开发环境可以直接当作COM进行调用;ChLibBuilder.exe为字库建造工具,建造字库供插件进行调用! 1....
  • VB调用Office OCR组件实现图文识别 ...Microsoft Office Document ImagingOption Explicit'利用MS Office 2003/2007的OCR控件, 对图片进行OCR识别'在VB中,只需要不到10行代码就能够实现自已的OCR文字识别软件...

    用VB调用Office OCR组件实现图文识别

    原文:http://sheng.iteye.com/blog/1330063

    Office OCR 图文识别 Microsoft Office Document Imaging

    Option Explicit
    '利用MS Office 2003/2007的OCR控件, 对图片进行OCR识别
    '在VB中,只需要不到10行代码就能够实现自已的OCR文字识别软件.
    '1. 添加控件,需要安装office2003, 没有安装office2003的可以从别人机子上拷贝相关文件,注册regsvr32.exe mdivwctl.dll,
    '控件一般在这个目录下:C:\Program Files\Common Files\Microsoft Shared\MODI.0, 只需要相关的几个文件就可以了, 此文件夹全部文件大概在21M左右.
    '2.工程->部件->添加这个控件:Microsoft Office Document Imaging 11.0 Type Library
    '3.需要注意的一点是,在Windows2003 Server上,如果用Office自带的识别软件,会报错:
    '  "在一页或多页上执行 OCR 不成功(未找到文本)"的错误,但用VB写的测试程序识别是正常的。

    'OCR的主要功能
    Private Function OCRImageFile(ByVal strImageFileName As String) As Boolean
        Dim miDoc As Object
         '初始化并加载文档
        Set miDoc = CreateObject("MODI.Document")           '创建对象
        miDoc.Create(strImageFileName)                      '加载图片文件
        Screen.MousePointer = vbHourglass                   '设置沙漏光标
        '识别
        Err.Clear
        miDoc.Images(0).OCR 2052, True, True
        Text1.Text = miDoc.Images(0).Layout.Text
        OCRImageFile = True
        Screen.MousePointer = vbArrow                       '恢复箭头光标
    End Function

    Private Sub cmdOCR_Click()
        Dim bolP As Boolean
        Dim strFileName as String
        strFileName = "c:\test.tif"
        bolP = OCRImageFile(strFileName)
    End Sub

    转载于:https://www.cnblogs.com/dhaichen/p/5188054.html

    展开全文
  • p003_orient.zip 改变缺省的打印方向(3KB) 608,p002.zip 在VB5/6中增加打印预览功能(78KB) 609,p001.zip 简单的打印文件的例子(5KB) 610,o046_4.zip 识别常数的简单四则运算(3KB)' 611,o045...
  • p003_orient.zip 改变缺省的打印方向(3KB) 608,p002.zip 在VB5/6中增加打印预览功能(78KB) 609,p001.zip 简单的打印文件的例子(5KB) 610,o046_4.zip 识别常数的简单四则运算(3KB)' 611,o045...
  • p003_orient.zip 改变缺省的打印方向(3KB) 608,p002.zip 在VB5/6中增加打印预览功能(78KB) 609,p001.zip 简单的打印文件的例子(5KB) 610,o046_4.zip 识别常数的简单四则运算(3KB)' 611,o045...
  • p003_orient.zip 改变缺省的打印方向(3KB) 608,p002.zip 在VB5/6中增加打印预览功能(78KB) 609,p001.zip 简单的打印文件的例子(5KB) 610,o046_4.zip 识别常数的简单四则运算(3KB)' 611,o045...
  • util实现Java图片水印添加功能,有添加图片水印和文字水印,可以设置水印位置,透明度、设置对线段锯齿状边缘处理、水印图片的路径,水印一般格式是gif,png,这种图片可以设置透明度、水印旋转等,可以参考代码加以...
  • 一般自动识别,若是左右手谱,自动设置为1毫秒!(2013-11-06) 3、增加全部命令行参数演示批处理文件。(2013-11-06) 未完成: 3、录制过程也可改用计时器,可记入休止符?! 4、增加自定义键盘按键设置!电脑...
  • Java开发技术大全(500个源代码).

    热门讨论 2012-12-02 19:55:48
    代码范例列表 第1章 示例描述:本章演示如何开始使用JDK进行程序的开发。 HelloWorldApp.java 第一个用Java开发的应用程序。 firstApplet.java 第一个用Java开发的Applet小程序。 firstApplet.htm 用来装载...
  • 9、插入代码功能修改:加入VBScript、Jscript、CSS、XML、SQL、VB.NET、Java等功能 2008.2.19 V1.2 1、加入了计时器 2、修正了全屏编辑时无法真正完全全屏的Bug 3、“插入代码”部分加入了“运行代码框”
  • Hack说明: 1,发贴后可返回该贴或返回...56,管理员或版主使用vBcode颜色代码标题发帖 注意: 此版本程序已经过最大优化,速度相对上一版本提升20%以上;由于默认风格使用大量图片,各位使用时,可将相关的图片和模板删除
  • JAVA上百实例源码以及开源项目

    千次下载 热门讨论 2016-01-03 17:37:40
    util实现Java图片水印添加功能,有添加图片水印和文字水印,可以设置水印位置,透明度、设置对线段锯齿状边缘处理、水印图片的路径,水印一般格式是gif,png,这种图片可以设置透明度、水印旋转等,可以参考代码加以...
  • vc++ 应用源码包_2

    2012-09-15 14:27:40
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • vc++ 应用源码包_1

    2012-09-15 14:22:12
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • vc++ 应用源码包_6

    2012-09-15 14:59:46
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • vc++ 应用源码包_5

    2012-09-15 14:45:16
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • vc++ 应用源码包_4

    2012-09-15 14:38:35
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • vc++ 应用源码包_3

    2012-09-15 14:33:15
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • 1.2 VB应用程序的开发步骤 实例008 创建或打开新工程 实例009 建立并设计用户界面 实例010 添加程序代码 实例011 运行调试程序 实例012 保存程序并生成可执行文件 1.3 控件注册和对象引用 实例013 添加...
  • 1.2 VB应用程序的开发步骤 实例008 创建或打开新工程 实例009 建立并设计用户界面 实例010 添加程序代码 实例011 运行调试程序 实例012 保存程序并生成可执行文件 1.3 控件注册和对象引用 实例013 添加...
  • vc++ 开发实例源码包

    2014-12-16 11:25:17
    如题,此实例非常适合学习,重载并自绘了Wnd类,效果是上下文字图片文字由大到小和星星闪烁等滚动效果。实例使用了加载类似xml文件读取信息,然后显示。 COM_ATL_Tutorial 简单的atl控件演示 COM接口挂钩及其...
  • 实例003 WAV音频流识别程序 7 实例004 提供朗读方式的朗读程序 9 实例005 带口型演示的英文朗读程序 12 实例006 TTS语音录音 16 1.2 音频播放及录制 19 实例007 播放MP3文件 19 实例008 实现队列播放MP3 20 ...
  • 实例003 WAV音频流识别程序 7 实例004 提供朗读方式的朗读程序 9 实例005 带口型演示的英文朗读程序 12 实例006 TTS语音录音 16 1.2 音频播放及录制 19 实例007 播放MP3文件 19 实例008 实现队列播放MP3 20 ...
  • Excel_VBA教程

    2014-09-22 11:36:34
    2.5 将宏指定给图片或其他对象 6 2.6 小结 7 第三课 学习控件 7 3.1 EXCEL开发过程简介 7 3.2 认识不同的控件 7 3.3 向工作表添加控件 7 3.4 设置控件的特性 8 3.5 给控件命名 8 3.6 使用用户窗体 8 3.7 疑难解答 9 ...
  • ExcelVBA程序设计.doc

    2011-04-05 21:32:51
    2.5 将宏指定给图片或其他对象 6 2.6 小结 7 第三课 学习控件 7 3.1 EXCEL开发过程简介 7 3.2 认识不同的控件 7 3.3 向工作表添加控件 7 3.4 设置控件的特性 8 3.5 给控件命名 8 3.6 使用用户窗体 8 3.7 疑难解答 9 ...
  • 置列图片()有时功能不正常或导致随机错误。 13. 修改BUG:Sqlite3数据库支持库中的“Sqlite记录集.绑定参数()”命令不支持汉字/UTF-8。 14. 修改BUG:VCL相关支持库部分组件在修改个别属性或调用个别方法后不可见...
  • 1亦思验证码识别1.5免费版.ec 24位转单色位图模块.ec 32张发牌.ec 3D引擎支持库-eOgre.ec 69msn.ec ACCESS 到高级表格.ec Access操作.ec Access数据库压缩修复新建.ec ACCSEE记录显示到超级列表框模块.ec ACSII 加...

空空如也

空空如也

1 2
收藏数 36
精华内容 14
关键字:

vb识别图片文字代码