主题：[求助]未查询到符合条件行时，点击返回按钮会出错，如何避免？

搜索到符合条件行，返回按钮正常，未搜索到行，点击返回按钮就会报错，估计是没有行自然不能判断行状态，但是不知如何修改，请大家指教。

 

_btntreturn_Click

 

With Tables("基本信息")

    If .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改

        MainTable = Tables("导航")

        Vars("_BtnSFBS")="导航"

        Forms("共有窗口").Controls("NavBar1").SelectedIndex = 0

    Else

         MessageBox.Show("请先保存信息再返回!.","提示")

        Return

    End If

End With

谢谢，已解决。