.版本 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ù)型

.版本 2.程序集 窗口程序集1.子程序 _識(shí)別按鈕_被單擊.局部變量 文件名, 文本型.局部變量 識(shí)別結(jié)果, 文本型.局部變量 分割, 文本型, , "0".局部變量 i, 整數(shù)型.局部變量 二次分割, 文本型, , "0".如果 (通用對(duì)話框1.打開 ())  文件名 ＝ 通用對(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é)束