- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- SQLtable表增加的临时列，怎么绑定到窗体控件 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=106811)
-- 发布时间：2017/9/15 22:41:00
-- SQLtable表增加的临时列，怎么绑定到窗体控件
如新增临时列“名称”，怎么绑定在窗体控件中，按进仓窗体_进仓表.名称不行，名称是临时列
-- 发布时间：2017/9/15 22:54:00
--
增加列后再绑定：http://www.foxtable.com/webhelp/scr/1860.htm
上传具体代码看看
-- 发布时间：2017/9/16 15:22:00
--
两个问题
1.在窗体控件中绑定临时“名称”列
2.包材申请明细表中，自动计算申购数量，申购数量=订单数量*需要数量
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.zip |
-- 发布时间：2017/9/16 16:09:00
--
窗口Afterload
Dim cbo As WinForm.ComboBox = e.Form.Controls("ComboBox3")
cbo.BindingField = "包材申购窗体_包材申请明细表.名称"
For Each r As Row In Tables("包材申购窗体_包材申请表").Rows
For Each dr As DataRow In Tables("包材申购窗体_包材申请明细表").DataTable.Select("申请编号=" & r("_Identify"))
dr("申购数量") = r("订单数量") * dr("需要数量")
Next
Next
-- 发布时间：2017/9/16 22:36:00
--
For Each r As Row In Tables("包材申购窗体_包材申请表").Rows
For Each dr As DataRow In Tables("包材申购窗体_包材申请明细表").DataTable.Select("申请编号=" & r("_Identify"))
dr("申购数量") = r("订单数量") * dr("需要数量")
Next
Nex
这条不行
-- 发布时间：2017/9/17 15:16:00
--
DataColChanged事件
Dim dr As DataRow = e.DataRow
If e.DataCol.name = "需要数量" Then
dr("申购数量") = Tables("包材申购窗体_包材申请表").current("订单数量") * dr("需要数量")
End If
-- 发布时间：2017/9/17 22:02:00
--
可以了，谢谢老师