以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  逻辑列判断填充  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140754)

--  作者:yifan3429
--  发布时间:2019/9/12 18:15:00
--  逻辑列判断填充
If e.DataCol.Name = "结账" Then \'如果是已结帐列的内容变动
    If e.NewValue = False Then \'而且变动后的值是True(已勾选)
        e.DataRow.Locked = False \'那么锁定此行
        e.DataRow("结账信息") = User.Name & "-"& Date.Now & "撤销结账"
        e.DataRow("结账日期") =  Nothing
        e.DataRow("出纳") =  Nothing
        e.DataRow("大类") = "B.负债"   这句需要判断下,如果内容是  c.损益  那么等于  B.负债   如果不是 c.损益 什么也不做
    End If
End If

--  作者:y2287958
--  发布时间:2019/9/12 18:40:00
--  
If e.DataRow("内容") = "c.损益"
    e.DataRow("大类") = "B.负债"
End If