以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]请问老师关于数据核验的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113362)

--  作者:biaoai2011
--  发布时间:2018/1/14 20:06:00
--  [求助]请问老师关于数据核验的问题
请问老师,如何让数据加载后系统后台能自动核验之前录入的数据是否正确,需要用到哪个事件,代码怎么写。
--  作者:有点甜
--  发布时间:2018/1/14 20:24:00
--  

加载数据后,会触发AfterLoad事件。

 

你可以在那个事件,循环每一行,根据你的逻辑,写代码判断是否正确。


--  作者:biaoai2011
--  发布时间:2018/1/14 20:35:00
--  
以下是引用有点甜在2018/1/14 20:24:00的发言:

加载数据后,会触发AfterLoad事件。

 

你可以在那个事件,循环每一行,根据你的逻辑,写代码判断是否正确。


能给个连接教程吗?老师。


--  作者:有点甜
--  发布时间:2018/1/14 20:36:00
--  
关键是你校验的逻辑是什么?做个例子说明一下。
--  作者:biaoai2011
--  发布时间:2018/1/14 20:46:00
--  
以下是引用有点甜在2018/1/14 20:36:00的发言:
关键是你校验的逻辑是什么?做个例子说明一下。
校验身份证录入是否正确,是否符合逻辑。系统教程给的那个代码用不了。


--  作者:有点甜
--  发布时间:2018/1/14 22:05:00
--  

单独执行代码,如

 

For Each dr As DataRow In DataTables("表a").datarows
    If ValidPIN(dr("第一列")) = False Then
        msgbox(dr("第一列") & " 不正确")
    End If
Next