[求助]扫描身份证进行输入的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]扫描身份证进行输入的问题

共有2412人关注过本帖树形打印复制链接主题：[求助]扫描身份证进行输入的问题

jumping

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：27 积分：340 威望：0 精华：0 注册：2017/3/2 8:31:00

Post By：2017/3/23 15:07:00 [只看该作者]

按钮的代码没有改动过，没有改您给的代码之前是可以手动读取信息的，改了之后就手动读不了了，我将代码改为以前的（没有加您红色的代码），又可以手动读取了，手动读取的代码为：

Dim lb1 As WinForm.Label = e.Form.Controls("Lab_shenfenbiaoti")
If CVR_Authenticate= 1 Then '如果身份证验证通过
    Dim readContent As Integer = CVR_Read_Content(4) '读取身份证信息,注意读取模式设置为4.
    If readContent = 1 Then
        lb1.Text = "读身份证信息成功!"
        Functions.Execute("parse")
    Else
        lb1.Text = "读身份证信息失败!"
    End If
Else
    lb1.Text = "没有检测到有效身份证!"
End If

一直没有改过

请指点下！多谢了！