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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 数据条件

共有7237人关注过本帖树形打印复制链接主题：数据条件

zhuxinhui

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

加好友

发短信

等级：八尾狐帖子：2064 积分：6831 威望：0 精华：0 注册：2017/11/8 17:37:00

数据条件

Post By：2022/9/27 2:06:00 [只看该作者]

Dim dc As DataRow = e.DataRow

Select Case e.DataCol.Name

Case "单号", "货料编码", "选择"

If dc.IsNull(e.DataCol.Name) Then

dc("核对备注") = Nothing

Else

'Dim fdr As DataRow = DataTables("销售开单").SQLfind("货料编码='" & dc("货料编码") & "'and 单号='" & dc("单号") & "'and 数量='" & dc("数量") & "'and 结算金额='" & dc("结算金额") & "'")

Dim st = dc("数量")

Dim fdr As DataRow = DataTables("销售开单").SQLfind("货料编码='" & dc("货料编码") & "'and 单号='" & dc("单号") & "'")

If fdr IsNot Nothing Then

dc("核对备注") = fdr("单号")

End If

End Select

为什么使用 'Dim fdr As DataRow = DataTables("销售开单").SQLfind("货料编码='" & dc("货料编码") & "'and 单号='" & dc("单号") & "'and 数量='" & dc("数量") & "'and 结算金额='" & dc("结算金额") & "'")，不能引出值来呢？？？