以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数据条件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=180078)

--  作者:zhuxinhui
--  发布时间: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 If
End Select

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

--  作者:有点蓝
--  发布时间:2022/9/27 8:42:00
--  
先看5遍:http://www.foxtable.com/webhelp/topics/1284.htm

表达式中的日期用符号#括起来,数值则不需要任何符号括起来,这些和代码中的格式是一样的,唯一不同的是字符串用单引号括起来。

例如:

Tables("订单").Filter = "[产品] = \'PD01\'"  \'字符用单引号括起来
Tables("订单").Filter = "[日期] = #3/17/1999#"  \'日期用#括起来
Tables("订单").Filter = "[折扣] = 0.1"  \'数值直接使用


--  作者:zhuxinhui
--  发布时间:2022/9/27 10:29:00
--  
觉悟太LOG了,看十遍都不行,都是要实践出真知
多谢老师了