以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  prepareedit事件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93416)

--  作者:lk15502
--  发布时间:2016/11/28 15:17:00
--  prepareedit事件
代码是写在表事件prepreaedit中,有for each语句,不行,应该写在哪里?
Case "织造重量"
        If _usergroup = "剪毛车间" OrElse _userroles.Contains("剪毛车间") = True Then
            If e.Row.Isnull("织造人员") = False Then
                Dim nms() As String = e.Row("织造人员").replace(",","\',\'").Split(",") \'将织造人员列内容拆分成数组
                For Each nm As String In nms \'遍历参与加工此产品的每个姓名-重量
                    Dim nm1() As String = nm.replace("-","\'-\'").split("-")
                    nm1(1) = nm1(1).trim("\'")
                    Dim v As Double = val(nm1(1))
                    e.Row("织造重量") = e.Row("织造重量") + v
                Next
            End If
        End If


--  作者:有点蓝
--  发布时间:2016/11/28 15:20:00
--  
没看懂你要做什么,截图说明一下
--  作者:lk15502
--  发布时间:2016/11/28 16:09:00
--  
for each 语句写在prepreaedit中死循环了,该怎么办?
--  作者:有点蓝
--  发布时间:2016/11/28 16:11:00
--  
改到DataColChanging事件中