如果在表时间中编辑要怎么修改命令 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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("账目类型") = "支出"
        Else
            dr = DataTables("学生一览表").Find("姓名 = '" & e.DataRow("相关人员") & "'")
            If dr IsNot Nothing Then
                e.DataRow("账目类型") = "收入"
            End If
        End If
    End If
End If

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

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