- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 跨表取数问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14121)
-- 发布时间：2011/11/8 23:52:00
-- 跨表取数问题
想实现 产量表中“所属周期”根据 “周期表 ”中时间划分自动填列。。。
。。。。求救高手。。
-- 发布时间：2011/11/9 9:06:00
--
1、看不到你的图，图片要上传，别人才能看见
2、提问最好也附上你的文件。
-- 发布时间：2011/11/9 12:27:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:生产消耗.table |
文件上来了。。。哪位大侠帮忙看看
怎样 做到 产量表 中“所属周期”根据 “周期表 ”中时间划分自动填列。。。
-- 发布时间：2011/11/9 13:09:00
--
DataColChanged事件:
If e.DataCol.Name = "日期" Then
If e.DataRow.IsNull("日期") Then
e.DataRow("所属周期") = Nothing
Else
Dim dr As DataRow
Dim fl As String
fl ="起炉时间 <= # " & e.DataRow("日期") & "# And 停炉时间 >= #"
fl+= e.DataRow("日期") & "# and 部门 = \'" & e.DataRow("部门") & "\'"
dr =DataTables("周期表").Find(fl)
If dr IsNot Nothing Then
e.DataRow("所属周期") = dr("周期")
End If
End If
End If
-- 发布时间：2011/11/9 14:09:00
--
非常 感谢
hhbb