主题：窗口中做的“删除按钮”为什么不管用啊？老师帮看看吧

If   MessageBox.Show("是否删除该条资金申请【" & tbl.current("合同名称") & " 资金申请金额:" & tbl.current("资金使用申请金额") & "】", "警告", MessageBoxButtons.YesNo, MessageBoxIcon.Question)=DialogResult.Yes

    messagebox.show(Tables("资金使用申请表").current(_Identify)) '弹出什么值?

    Tables("资金使用申请表").current.delete

    messagebox.show(Tables("资金使用申请表").current(_Identify)) '弹出什么值?

    Tables("资金使用申请表").save

    messagebox.show(3)

End If