易語(yǔ)言調(diào)用dll實(shí)現(xiàn)條形碼本地離線識(shí)別的代碼
DLL命令表
需要提前下載用到命令對(duì)應(yīng)的庫(kù)
.版本 2 .DLL命令 OCR, 文本型, "AspriseVB.dll", "OCR" .參數(shù) file, 文本型 .參數(shù) imageType, 整數(shù)型 .DLL命令 OCRBarCodes, 文本型, "VBWrapper.dll", "OCRBarCodes" .參數(shù) file, 文本型 .參數(shù) imageType, 整數(shù)型 .DLL命令 OCRpart, 文本型, "VBWrapper.dll", "OCRpart" .參數(shù) file, 文本型 .參數(shù) imageType, 整數(shù)型 .參數(shù) startX, 整數(shù)型 .參數(shù) startY, 整數(shù)型 .參數(shù) width, 整數(shù)型 .參數(shù) height, 整數(shù)型
條形碼本地離線識(shí)別的代碼
.版本 2 .程序集 窗口程序集1 .子程序 _識(shí)別按鈕_被單擊 .局部變量 文件名, 文本型 .局部變量 識(shí)別結(jié)果, 文本型 .局部變量 分割, 文本型, , "0" .局部變量 i, 整數(shù)型 .局部變量 二次分割, 文本型, , "0" .如果 (通用對(duì)話框1.打開(kāi) ()) 文件名 = 通用對(duì)話框1.文件名 識(shí)別結(jié)果 = OCR (文件名, -1) .如果 (取文本長(zhǎng)度 (識(shí)別結(jié)果) > 3) .如果 (尋找文本 (識(shí)別結(jié)果, “[”, , 假) > -1) 分割 = 分割文本 (識(shí)別結(jié)果, “[”, ) .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (分割) - 1, i) .如果 (尋找文本 (分割 [i + 1], “]”, , 假) > -1) 二次分割 = 分割文本 (分割 [i + 1], “]”, ) .如果 (二次分割 [1] ≠ “”) .如果 (取文本長(zhǎng)度 (二次分割 [1]) > 8) 信息框 (二次分割 [1], 0, ) .否則 .如果結(jié)束 .否則 .如果結(jié)束 .否則 .如果結(jié)束 .計(jì)次循環(huán)尾 () .否則 .如果結(jié)束 .否則 .如果結(jié)束 .否則 .如果結(jié)束
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
相關(guān)文章
易語(yǔ)言關(guān)于數(shù)據(jù)庫(kù)“置當(dāng)前庫(kù)”命令用法
在本篇文章里小編給各位分享的是關(guān)于易語(yǔ)言關(guān)于數(shù)據(jù)庫(kù)“置當(dāng)前庫(kù)”命令用法,有興趣的朋友們可以學(xué)習(xí)下。2020-03-03易語(yǔ)言調(diào)用whois實(shí)現(xiàn)域名批量查詢與注冊(cè)的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言調(diào)用whois實(shí)現(xiàn)域名批量查詢與注冊(cè)的代碼,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11