以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]表A的某列等于某值时,自动把某值的那一行引用到表B  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=40390)

--  作者:xuxu521
--  发布时间:2013/9/17 20:19:00
--  [求助]表A的某列等于某值时,自动把某值的那一行引用到表B
[求助]表A的某列等于某值时,自动把某值的那一行引用到表B,如何实现啊?
--  作者:程兴刚
--  发布时间:2013/9/17 20:27:00
--  

昨晚刚做的一个示例,正好用上:表B选择不同的编号

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目8.table


--  作者:有点甜
--  发布时间:2013/9/17 20:29:00
--  
 耐心看帮助。


--  作者:xuxu521
--  发布时间:2013/9/17 21:38:00
--  

这个是查询啊。

要全部引用到B表。

麻烦了。

 

 


--  作者:程兴刚
--  发布时间:2013/9/17 21:41:00
--  

没告诉您在表B选择不同的编号?


--  作者:有点甜
--  发布时间:2013/9/17 21:42:00
--  
 就几句代码的事,楼主耐心看帮助吧,3楼

Dim dr As DataRow
dr = DataTables("产品").Find("[品名] = \'" & e.NewValue & "\'")
If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing
    e.DataRow("单价") = dr("单价")
    e.DataRow("金额") = dr("金额")
End If

--  作者:程兴刚
--  发布时间:2013/9/17 21:47:00
--  
就是啊,其实我的示例文件的表B,输入不同的编号,就根据编号自动调用了姓名,他不看我的提示啊!
--  作者:xuxu521
--  发布时间:2013/9/17 22:16:00
--  

这个只能引用一组数据,如果我要引用A表中等于某值的全部数据呢?

 


--  作者:程兴刚
--  发布时间:2013/9/17 22:18:00
--  
看词典,先拿一个小时学会“举一反三”的真实释义,要心领神会!
--  作者:xuxu521
--  发布时间:2013/9/17 22:23:00
--  

词典太深奥,我就想解决这一个问题