主题：要两次保存才能下一条

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

With Tables("person")
     If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改
        .Position = .Position + 1
    End If
End With

老师， 这个是下一条的代码

我在重置单位的时候，重置后点保存，然后点下一条不管用，再点保存 ，之后点下一条才能跳到下一条