一个简单的例子

本节的例子可以参考CaseStudy目录下的文件：指纹识别.Table

提示：保存指纹模板的列，必须是备注型。

该示例完整地演示了登记、修改和验证指纹模板的过程：

1、在表中增加一行，输入姓名，单击“登记指纹”按钮，出现“登记指纹”窗口，连续按压四次指纹后，系统会结合这四次指纹的信息，生成一个指纹模板，保存在“指纹模板”列：

2、如果要修改某个用户的指纹模板，先选择此用户，然后单击“登记指纹”。

3、任何时候按压指纹，都会将获得的指纹模板，和用户表中的指纹模板逐个进行比对，如果和某用户的指纹模板相符，就显示此用户的姓名。

设计步骤非常简单：

1、在项目事件AfterOpenProject中加上下面的代码，用于启动指纹仪：

FOXFinger.Start()

2、将窗口中“登记指纹”按钮的代码设置为：

Dim fg As String = FoxFinger.EnRoll() '登记指纹
If fg > ""  Then '如果登记成功
    Tables("用户").Current("指纹模板") = fg '保存获得的指纹模板
    Tables("用户").Current.Save()
End If

3、将FingerCapture事件的代码设置为：

For Each dr As DataRow In DataTables("用户").DataRows
    If dr.IsNull("指纹模板") = False Then
        If FoxFinger.verify(dr("指纹模板"),e.Features) Then '如果指纹模板相符
            MessageBox.Show("您就是" & dr("姓名") & ", 对吗?","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
            Return
        End If
    End If
Next
MessageBox.Show("没有找到指纹相符的用户","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)