以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么用代码让关联表增加一行时自动填入父表值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9815)

--  作者:banemon
--  发布时间:2011/5/9 3:17:00
--  怎么用代码让关联表增加一行时自动填入父表值
如题::
在关联表中Addnew(),让关联表的“日期”=父表的“日期”

我用在buton的cleck事件中
OK了,3Q
 
继续问,
窗体中的Table控件.不显示已有的数据,怎么设置,代码怎么写
如何判断某行中几个不连续的数据都不为空..
[此贴子已经被作者于2011-5-9 18:48:42编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/5/9 7:09:00
--  

关联表的DataRowAdded事件:

 

Dim  dr As DataRow = e.DataRow.GetParentRow("父表名称")

If dr Is Not Nothing Then

    e.DataRow("日期")  = dr("日期")

End If

 

[此贴子已经被作者于2011-5-9 7:24:23编辑过]

--  作者:blackzhu
--  发布时间:2011/5/9 7:19:00
--  
他要的是按钮.
--  作者:狐狸爸爸
--  发布时间:2011/5/9 7:26:00
--  

这样:

 

Dim r As Row = Tables("父表名.子表名").AddNew

r(“日期")  = Tables("父表名").Current("日期")