[已解决]由表１及表２得出结果表 我自已想了个法不知能实现不？

shitou1ge

表1.编号＝表2.编号　是一对多的关系　就是把两个表连在一起
其中　结果表中的名称要判断　
如果是主机　那么名称为主机名称
如果是部件　那么名称为部件名称

如是是零件　那么名称为零件
我不知咋写　

我想了一个办法＂在ＶＢＡ　里实现
打开表1 打开表2
  do while (表1不是最后一条记录)
      AAA=表1.编码
    　if 表1.类型为主机　then
         insert into 结果表 (编码，名称，小部件编码，小部件名称 ) values(表1.编码，表1.主机名称，“”，“”)
          打开表2 查找编码等于AAA(不会写)
         insert into 结果表 ( 编码，名称，小部件编码，小部件名称  ) values(AAA,"" ,表2.编码，表2.名称)
  end if

if 表1.类型为组件　then
         insert into 结果表 (编码，名称，小部件编码，小部件名称 ) values(表1.编码，表1.组件名称，“”，“”)
          打开表2 查找编码等于AAA(不会写)
         insert into 结果表 ( 编码，名称，小部件编码，小部件名称  ) values(AAA,"" ,表2.编码，表2.名称)
  end if



if 表1.类型为零件　then
         insert into 结果表 (编码，名称，小部件编码，小部件名称 ) values(表1.编码，表1.零件名称，“”，“”)
          打开表2 查找编码等于AAA(不会写)
         insert into 结果表 ( 编码，名称，小部件编码，小部件名称  ) values(AAA,"" ,表2.编码，表2.名称)
  end if

不知这种方法行不行·
具体的我不太会写，还请高手大哥帮忙啊！

chuang0321

todaynew厉害！

shitou1ge

谢谢　todaynew 大哥　

todaynew

SELECT a.编码, a.编码 AS 编号, iif(a.部件名称 is null and a.零件名称 is null,a.主机名称,iif(a.零件名称 is null,a.部件名称,a.零件名称)) AS 名称, "" AS 小件编号, "" AS 小部件名称
FROM 表1 as a
UNION ALL SELECT b.编号 AS 编码, "" as 编号,"" AS 名称, b.编号 AS 小件编号, b.名称 AS 小部件名称
FROM 表2 as b
ORDER BY 编码, 编号 DESC , 小部件名称;

todaynew

您做的　结果为图片１
我要的是图片２的结果
不同点为：结果表中的名称要根据表１中类型判断
　　　　　　结果表中的名称一列的值不是固定的
shitou1ge 发表于 2009-4-17 16:12

哦，看明白了。用dlookup应该可以解决

蓝天8390

哈哈,我喝西醉了,什么都不知道,只是看着shitou1ge太漂亮,就多看了几眼,版主注意到了没有,真的很漂亮!不信你仔细看看

shitou1ge

shitou1ge

您做的　结果为图片１
我要的是图片２的结果
不同点为：结果表中的名称要根据表１中类型判断
　　　　　　结果表中的名称一列的值不是固定的

todaynew

表３　就是结果表　
shitou1ge 发表于 2009-4-17 14:29

那不是已经给你做出来了吗？

shitou1ge

表３　就是结果表