up

如果是复杂的文字，还是建议你购买SDK库来实现，数字就好办了，细线化后进行模式识别。

问题没有说清楚。
是扫描识别呢？还是字符串里的汉字识别？

区分中英文字符
Public Function uLen(ByVal strBuf As String) As Long
    Dim i As Long
    Dim lngLen As Long
    Dim lngULen As Long
    
    lngLen = Len(strBuf)
    For i = 1 To lngLen
        ''判断该字符是否为汉字.
        ''如果是汉字,那么该字符的高8位为1
        If Asc(Mid(strBuf, i, 1)) And &H80 Then   
            lngULen = lngULen + 1
        End If
        lngULen = lngULen + 1
    Next
    uLen = lngULen
End Function

感觉楼主是xayzmb(行者) 说的意思

1 如果是图象里识别的话,那算法不太好搞,涉及的比较多

2 如果是字符串里识别的话,可以用行者的思路,但不要用Len函数,那个在计算单字节和双字节混合的字符串的时候,计算结果是不对的,需要自己写一个,然后接下来的是可以靠内码的范围来判断是否汉字了.本来想贴代码的,但以前做的东西一时找不到了

关于类似的问题我已经专门制电给我在美国认识的博士，在几天内有回应，给我email吧，dongkezheng0115@hotmail.com

我主要是想看看图像识别的问题！！
最近被这个问题搞的焦头烂额！！

用ascii码吧。不过中文的码范围不大清楚，反正是负的。