以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 一个商品信息如何判定是添加到入库明细表还是出库明细表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146726) |
-- 作者:g1j2h3 -- 发布时间:2020/3/1 10:41:00 -- 一个商品信息如何判定是添加到入库明细表还是出库明细表 一个商品信息表,选定商品行后,如何判定是添加到入库明细表还是出库明细表 下边这段代码如何修改:Dim Vals As List(of String()) Vals = DataTables("老商品增加_Table2").GetValues("商品编号|商品名称|规格型号|单位|数量|单价|备注") For i As Integer = 0 To Vals.Count - 1 Dim dr As Row = Tables("入库主表.入库明细").AddNew() dr("商品编号") = Vals(i)(0) dr("商品名称") = Vals(i)(1) dr("规格型号") = Vals(i)(2) dr("单位") = Vals(i)(3) dr("数量") = Vals(i)(4) dr("单价") = Vals(i)(5) dr("备注") = Vals(i)(6) Next Forms("老商品增加").Close() 在入库单和出库单增加商品时,都要用到下边这个"老商品增加"窗口,在选择完商品后,"确定",代码怎么写,若时从入库单打开的"老商品增加"窗口,就把所选商品添加到入库明细表中,若是从出库单打开"老商品增加"窗口,就把所选商品添加到出库明细表中。 [此贴子已经被作者于2020/3/2 7:43:07编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/3/1 21:37:00 -- 没看懂。要添加到哪个表不是操作人员的选择吗? |
-- 作者:g1j2h3 -- 发布时间:2020/3/2 8:06:00 -- 麻烦老师再看下,我是否已表达清楚 |
-- 作者:有点蓝 -- 发布时间:2020/3/2 8:48:00 -- "老商品增加"窗口是什么类型?独立窗口?还是下拉窗口? 如果是独立窗口,打开前使用全局代码记录一下,比如 入库明细按钮 vars("单据") = "入库主表.入库明细" forms("老商品增加").open 出库明细按钮 vars("单据") = "出库主表.出库明细" forms("老商品增加").open 添加数据时 Dim dr As Row = Tables(vars("单据")).AddNew()
|
-- 作者:g1j2h3 -- 发布时间:2020/3/2 10:12:00 -- 非常感谢老师的指导,问题终于解决了 |