以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  【sqltable关联表】两个sqltable通过代码进行了编号关联,但是为什么编号不能自动根据父表自动继承到子表编号列呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102566)

--  作者:李孝春
--  发布时间:2017/6/22 13:01:00
--  【sqltable关联表】两个sqltable通过代码进行了编号关联,但是为什么编号不能自动根据父表自动继承到子表编号列呢?
【sqltable关联表】两个sqltable通过代码进行了编号关联,但是为什么编号不能自动根据父表自动继承到子表编号列呢?

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20170622125808.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:sqltable表.table



问题2:在窗体中,表A与表B(sqltable),
有编号  日期两个控件,怎么绑定表A对应列呢?前提是在没有将表A弄成sqltable时,
当前我的操作方法是:
创建表A(sqltable),然后将当前表属性设置为隐藏,然后再一个个的绑定控件

不知道有没有更好更简单的办法呢?

请各位多多指导 谢谢
[此贴子已经被作者于2017/6/22 13:31:32编辑过]

--  作者:有点蓝
--  发布时间:2017/6/22 14:19:00
--  
sql2新增按钮

Dim r As Row = Tables("窗口1_Table4").AddNew()
If Tables("窗口1_Table1").Current IsNot Nothing Then
    r("编号") = Tables("窗口1_Table1").Current("编号")
End If

--  作者:李孝春
--  发布时间:2017/6/22 14:38:00
--  回复:(有点蓝)sql2新增按钮Dim r As Row = Tables(...
有点蓝老师 这个是代码赋值 
除了这个办法外 
是不是没有其他最好的办法了呢?

--  作者:有点色
--  发布时间:2017/6/22 15:16:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:sqltable表 (1).table


--  作者:jygyyl
--  发布时间:2017/6/22 23:37:00
--  回复:(有点色)[upload=table,sqltable表 (1).table...
我的狗狗过期了,无法升级。能否给出代码
--  作者:有点色
--  发布时间:2017/6/23 0:29:00
--  

DataRowAdding事件

 

If Tables("窗口1_Table1").Current IsNot Nothing Then
    e.DataRow("编号") = Tables("窗口1_Table1").Current("编号")
End If