- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]请问如下两个代码怎么合并 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63055)
-- 发布时间：2015/1/13 8:32:00
-- [求助]请问如下两个代码怎么合并
If e.DataCol.name="产品图号" Then
Tables("图纸信息表").Filter="产品图号 like \'%" & e.DataRow("产品图号") & "%\'"
End If
If e.NewValue Is Nothing Then
e.DataRow("名称") = Nothing
e.DataRow("材料") = Nothing
Else
Dim dr As DataRow
dr = DataTables("图纸信息表").Find("产品图号 = \'" & e.DataRow("产品图号") & "\' and 名称 is not null")
If dr IsNot Nothing
e.DataRow("名称") = dr("名称")
End If
dr = DataTables("图纸信息表").Find("产品图号 = \'" & e.DataRow("产品图号") & "\' and 材料 is not null")
If dr IsNot Nothing
e.DataRow("材料") = dr("材料")
End If
End If
第二个代码是我想加的
-- 发布时间：2015/1/13 8:34:00
--
你想做什么? 怎么合并? 你都不说你想做什么
-- 发布时间：2015/1/13 8:43:00
-- [求助]请问如下两个代码怎么合并
工时统计表与图纸信息表
通过“产品图号”和“包括装配组件每台用量”关联
现在产品工时表 输入 “产品图号”和“包括装配组件每台用量” “车间名称” 自动出现“工序明细” 和 工时合计
（一楼的第一个代码好像与此有关）
现在我想把图纸信息表里面的“名称”和“材料”弄到“工时统计表里面”
上个例子
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:例子6.foxdb |
-- 发布时间：2015/1/13 8:43:00
-- [求助]请问如下两个代码怎么合并
密码147
-- 发布时间：2015/1/13 8:50:00
--
这和你第一段代码,八竿子打不着.
你第二段代码也重复了,没必要一直FIND,你找到了行,你想取什么就取什么啊. 名称啊任何东西都能取
If e.NewValue Is Nothing Then
e.DataRow("名称") = Nothing
e.DataRow("材料") = Nothing
Else
Dim dr As DataRow
dr = DataTables("图纸信息表").Find("产品图号 = \'" & e.DataRow("产品图号") & "\' and 名称 is not null")
If dr IsNot Nothing
e.DataRow("名称") = dr("名称")
e.DataRow("材料") = dr("材料")
\'你想取什么,这里继续取
e.datarow("列名")=dr("列名")
End If
End If
-- 发布时间：2015/1/13 9:03:00
-- [求助]请问如下两个代码怎么合并
感谢楼主
那1楼的 第一个代码 适合目的呢??
有点蒙
-- 发布时间：2015/1/13 9:05:00
--
那个是筛选表. http://www.foxtable.com/help/topics/1432.htm
新手建议先看一下我们的帮助
打开软件按F1或者点击左上角的小问号,可以打开非常详细的图文帮助
-- 发布时间：2015/1/13 12:25:00
-- [求助]请问如下两个代码怎么合并
“产品图号”和“包括装配组件每台用量”
这两列分别有重复的项
列出的值就出现错误了
上个例子
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:例子7.foxdb |
此列当中的
A 总成 gf 1 D
实际应为
A 总成 饭馆 1 A
A 总成 gf 1 D
实际应为
A 总成 饭馆 1 A
“名称”和“材料”
这两列索引的值是不正确的
请教该如何修改公式
[此贴子已经被作者于2015-1-13 12:26:10编辑过]
-- 发布时间：2015/1/13 14:16:00
--
你以这两列作为依据 你这两列是完全一致的,当然无法区分了. 要么保证唯一性, 要么多增加一个列作为条件 形成唯一性
-- 发布时间：2015/1/13 14:18:00
--
不知道你想表达什么