主题：[求助]麻烦帮我看一下这段代码的问题出在哪里了呢，谢谢

这段是一个删除代码，希望当前行的审核人格中如果有数据的话，提示“该记录已审核,请反审核后再删除!”，如果没有数据的话，执行下面删除的代码。现在出现一个问题，就是无论审核人格中有没有数据，都提示“该记录已审核,请反审核后再删除!”

If Tables("订单主表").Current("审核人") <> "nothing" Then

MessageBox.Show("该记录已审核,请反审核后再删除!")

Else

If Tables("订单主表").Current IsNot Nothing Then

    If MessageBox.Show("是否删除?","请确认",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then

        DataTables("订单明细表").SQLDeleteFor("客户订单号 = '" & Tables("订单主表").Current("客户订单号") & "'")

        Tables("订单主表").Current.Delete

        DataTables("订单主表").save

        DataTables("订单明细表").save

    End If

End If

End If

此主题相关图片如下：qq截图20141124113823.png