代码改成后台数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码改成后台数据

共有1713人关注过本帖树形打印复制链接主题：代码改成后台数据

jick0526

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

等级：三尾狐帖子：715 积分：6677 威望：0 精华：0 注册：2016/6/27 17:56:00

代码改成后台数据 发帖心情

Post By：2017/7/11 21:42:00 [显示全部帖子]

老师，下面的代码麻烦能不能帮我改成也会认到后台数据的，不知道该怎么改

Select Case e.DataCol.Name

Case "A","B","C"

Dim dr As DataRow = e.DataRow

Dim pr As DataRow

If dr.IsNull("A") OrElse dr.IsNull("B") OrElse dr.IsNull("C") Then

dr("F") = Nothing

Else

Dim filter As String

filter = "A = '" & dr("A") & "' And B = '" & dr("B") & "' And C = '" & dr("C") & "'"

pr = DataTables("表A").Find(filter)

If pr IsNot Nothing Then

e.DataRow("F") = "正确"

Else

e.DataRow("F") = "错误"

End If

End Select

jick0526

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

等级：三尾狐帖子：715 积分：6677 威望：0 精华：0 注册：2016/6/27 17:56:00

Post By：2017/7/11 22:11:00 [显示全部帖子]

老师，我想问下，我改了之后，打开软件直接卡机，我用的是ACCESS数据库可以吗？

主题：代码改成后台数据