主题：如果在表时间中编辑 要怎么修改命令

“账目类型”列数据自定义为“支出”和“收入”根据"相关人员"列的内容而自动代入

如果“相关人员”列内容=“教师一览表”“姓名”列下的任意一项，则“账目类型”=“支出”

如果“相关人员”列内容=“学生一览表”“姓名”列下的任意一项，则“账目类型”=“收入”

此主题相关图片如下：333333.png

If e.DataCol.Name = "相关人员" Then
    If e.NewValue Is Nothing Then
        e.DataRow("账目类型") = Nothing
    Else
        Dim dr  As  DataRow
        dr =  DataTables("教师一览表").Find("姓名 = '" & e.DataRow("相关人员") & "'")
        If dr IsNot Nothing Then
            e.DataRow("账目类型") = "支出"
        End If
    End If
End If

这样可以吗？