在分页集合版面动态添加的表如何继承基本表的表结构 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

你的代码直接报错不让保存，写成这样执行后也报错："Cannot find column [Nothing]."

Dim dt As DataTable = Forms("主窗口").Controls("基本信息录入").Table.DataTable

For Each dr As DataRow In dt.Select("[姓名] Is Not Nothing")

For Each c2 As Col In Forms("主窗口").Controls("基本信息").Cols

For Each c1 As DataCol In dt.DataCols

Dim nr As DataRow = DataTables("基本信息").AddNew()

　　　　 nr(c2.Name) = dr(c1.Name)

DataTables("基本信息").Load

DataTables("基本信息").Save()

主题：在分页集合版面动态添加的表如何继承基本表的表结构