以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助:子表自动增加多行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=85924)

--  作者:5646456456
--  发布时间:2016/6/5 22:12:00
--  求助:子表自动增加多行

求助:

       当父表输入一行时,子表自动增加指定行数,并按顺序填入指定内容(如图),求方法。

 


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

--  作者:Hyphen
--  发布时间:2016/6/6 8:49:00
--  
表ADataRowAdded事件

Dim idx As Integer = Tables("表B").Rows.Count
Tables("表B").AddNew(100)
For i As Integer = idx To Tables("表B").Rows.Count-1
    Tables("表B").Rows(i)("第一列") = "XXX"
Next

http://www.foxtable.com/help/topics/0560.htm
http://www.foxtable.com/help/topics/0631.htm