以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  帮忙看下这段代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=26068)
--  作者：even0898
--  发布时间：2012/11/23 15:55:00
--  帮忙看下这段代码

For Each r As Row In Tables("导入待入库明细_table2").GetCheckedRows
    Dim dr As Row = Tables("物料入库单主表.物料入库单明细").AddNew
    r("品名") = dr("品名")
    r("待入库通知单号") = dr("待入库单号")
Next
e.Form.Close

 

执行完这段代码后，r("品名")和r("待入库通知单号")消失。。在（物料入库单主表.物料入库单明细）新增的行里也看不见“品名”和单号

参照paul同学的视频写的..

这个。。到底是怎么回事？
--  作者：狐狸爸爸
--  发布时间：2012/11/23 16:00:00
--  

在“物料入库单主表.物料入库单明细”看不到，那就回到“物料入库单明细”看看新增的行在不在。

关联表看打不到新增的行，通常是因为你修改了关联列内容，因为关联表只会显示父表当前行下的关联字行。

 

如果搞不定，做个简单的例子传上来，我们帮你看看。
--  作者：even0898
--  发布时间：2012/11/23 16:03:00
--  

新增行是在的，只是赋值赋不上去。。而且取值的表的字段也消失了。。

难道是因为我的版本没更新。。我试试
--  作者：狐狸爸爸
--  发布时间：2012/11/23 16:04:00
--  

实在不行，就做个例子发上来，说明目的和遇到的问题，很快可以帮你分析出原因的。
--  作者：even0898
--  发布时间：2012/11/23 16:46:00
--  
以下是引用狐狸爸爸在2012-11-23 16:04:00的发言：

实在不行，就做个例子发上来，说明目的和遇到的问题，很快可以帮你分析出原因的。

例子来了...

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:测试导入.foxdb
--  作者：even0898
--  发布时间：2012/11/23 16:50:00
--  

还是一样的情况，郁闷了，赋值过去的话取值表的字段也变空白，addnew后的字段也是空白..
--  作者：狐狸爸爸
--  发布时间：2012/11/23 16:51:00
--  
For Each r As Row In Tables("导入待入库单明细_table2").GetCheckedRows
    Dim dr As Row = Tables("入库单主表.入库单明细").AddNew
    dr("品名") = r("品名")
    dr("待入库单号") = r("待入库单号")
Next
e.Form.Close
--  作者：even0898
--  发布时间：2012/11/23 16:56:00
--  
以下是引用狐狸爸爸在2012-11-23 16:51:00的发言：
For Each r As Row In Tables("导入待入库单明细_table2").GetCheckedRows
    Dim dr As Row = Tables("入库单主表.入库单明细").AddNew
    dr("品名") = r("品名")
    dr("待入库单号") = r("待入库单号")
Next
e.Form.Close

这个。。。狐爸，我黑线了...这个顺序也有讲究的咩？
--  作者：狐狸爸爸
--  发布时间：2012/11/23 17:01:00
--  
是我给你钱，还是你给我钱，你说会没有讲究吗？
--  作者：even0898
--  发布时间：2012/11/23 17:02:00
--  
以下是引用狐狸爸爸在2012-11-23 17:01:00的发言：
是我给你钱，还是你给我钱，你说会没有讲究吗？

这个以前真没留意到，今天学习了