主题：请教数据运算结果跳行问题

    '找到对应的学员这一行,改怎么减就怎么减
    Dim dr1 As DataRow = DataTables("学员一览表").Find("辅导老师 = '" & mr("姓名") & "' And 课程 = '" & mr("授课内容") & "' and 姓名 = '" & mr("学员名称") & "'")
    Dim dr2 As DataRow = DataTables("课类分类表").Find("科目 = '" & mr("授课内容") & "'")
   

    If dr1 Is Nothing OrElse dr2 Is Nothing Then

        messagebox.show("输入错误")

    End If

    mr.Save