以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请问这种变更可以实现吗?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=54363)

--  作者:rophy0952
--  发布时间:2014/7/26 15:30:00
--  [求助]请问这种变更可以实现吗?
不同行间的值变更,见附件:
--  作者:rophy0952
--  发布时间:2014/7/26 15:31:00
--  
怎么带不上图呢?
--  作者:rophy0952
--  发布时间:2014/7/26 15:32:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20140726152642.jpg
图片点击可在新窗口打开查看

--  作者:rophy0952
--  发布时间:2014/7/26 15:38:00
--  
哪位大仙可以帮忙指点一下的呀!
--  作者:rophy0952
--  发布时间:2014/7/26 15:58:00
--  
继续,
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:问题.foxdb


--  作者:yinyb36
--  发布时间:2014/7/26 16:01:00
--  
DataColChanged事件:

If e.DataCol.Name = "余光膜净重" Then
    Dim lsh As String = e.DataRow("流水号")
    If lsh.Contains("-") Then
        lsh = lsh.SubString(0,lsh.LastIndexOf("-"))
        Dim dr As DataRow = e.DataTable.Find("流水号 = \'" & lsh & "\'")
        If dr IsNot Nothing Then
            If dr("余光膜净重") > 0 Then
                dr("余光膜净重") = e.DataRow("余光膜净重")
            End If
        End If
    End If
End If

--  作者:rophy0952
--  发布时间:2014/7/26 17:22:00
--  
可以了,谢谢!