主题：找了半天，不知在哪加判断条件？请专家指点！

 不要delete啊，去掉代码啊

                Dim xhs As List(of String) = DataTables("学生信息表").GetValues("学号")
                If xhs.Contains(ksds("学号")) = False Then
                    ksds.Delete
                End If

 如果要判断，就在addNew的之前判断啊