主题：求助关联代码修改

If e.DataCol.Name = "商品名称" Orelse e.DataCol.Name = "编号"  Orelse e.DataCol.Name = "颜色" Then
    Dim dr As DataRow
    dr = DataTables("报价明细").Find("商品名称 = '" & e.DataRow("商品名称") & "' And 编号 = '" & e.DataRow("编号") & "' And 颜色 = '" & e.DataRow("颜色") & "'")
    If dr IsNot Nothing Then
        e.DataRow("单价") = dr("报价")
    End If
End If

 

DataColChanged

某一列的内容被更改后执行，此时列的内容已经是更改后的值

 

 

你的代码第一,位置放错了,第二,有最后一段代码就OK了.

做服装工厂的?还是外贸做服装的.

一样一样的,我也是做服装的.

我只做工厂跟单,所以做得东西是根据我服装工厂用的东西.

 

 

        几个部分:   生产通知单   裁剪数    装箱单    辅料订购    纸箱订购   出货    关于报价和结账一类我是没有弄.因为不是我管的范围.

 

      我无锡的,你那儿的?你要做到什么样子倒是我们可以讨论着做的.

  以便跟单员可以大家使用,所以考虑用外部数据源.

If e.Col.Name = "商品名称"  Andalso e.IsFocusCell Then
    e.Col.ComboList = DataTables("报价明细").GetComboListString("商品名称")
End If

 

商品名称列你读没有设定列表项目.

给商品名称加上一个编号,同样的东西如绳扣,你有三个供应商提供,那么每一个绳扣给一个编号对应,不就OK了.

  你看看这样做行不行?我认为你那个东西这样做就可以了,不要太复杂.

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

点击浏览该文件:管理项目77.table

    我一直认为服装用辅料不管价格还是品种所使用到的类别很多.因为每一个品牌和款式所用到的辅料都不一样,所以我建议辅料明细中加入一个品牌,以品牌归类好的多.