主题：表作为选择项出现

1、做一个发工资表；

2、和员工表建立关联，引用员工表的列

3、在发工资表录入员工编号等数据。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目10.foxdb

我就是想在表A中，点击右下角的增加按钮后，弹出窗体2

窗体2中，想加一列“工资”，不是实际加在表B中，只是临时加一下，方便我输入数值。

请问能不能实现，谢谢！！！

 afterload事件加入代码

Dim t As Table = e.Form.Controls("Table1").Table
If t.Cols.Contains("工资") = False Then
    t.DataTable.DataCols.Add("工资",Gettype(Double))
End If

 这个只是临时添加的没事。

 你可以在afterClose加入移除的代码

t.DataTable.DataCols.Delete("工资")