- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 请问这个表达式怎么写？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136243)
-- 发布时间：2019/6/10 11:39:00
-- 请问这个表达式怎么写？
此主题相关图片如下：产品表.png
此主题相关图片如下：订单表.jpg
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表达式.zip |
在范例的这几个表中，能不能在<产品表>中增加两列，不写代码，直接通过表达式得到每个产品 “C03客户最后一次购买的单价” 和“C03客户在2000年10月10日到2000年11月10日之间购买的总数量”
请问这两个列的表达式要怎么写？
-- 发布时间：2019/6/10 12:16:00
--
datacolchanged事件
If e.DataCol.Name = "子件品号" Then
If e.NewValue Is Nothing Then
e.DataRow("最新单价") = Nothing
Else
Dim dr As DataRow
dr = DataTables("进退货历史").Find("[品号] = \'" & e.DataRow("子件品号") & "\'", "_Identify desc")
If dr IsNot Nothing Then
e.DataRow("最新单价") = dr("单价")
Else
msgbox(123)
End If
End If
End If