为什么我在保存记录的代码上加了个IF语句就不好用了呢？

只如初见　发表于：2014-08-29 12:16:59 　

本来系统自己创建的代码，我加了IF，现在运行效果好像是原来的代码不执行了，为什么呢

Private Sub Command16_Click()
On Error GoTo Err_Command16_Click
If MsgBox("此数据已编辑，是否保存？", vbQuestion + vbYesNo, "中信万通") = vbNo Then
          Exit Sub
Else
    DoCmd.GoToRecord , , acNewRec

Exit_Command16_Click:
    Exit Sub

Err_Command16_Click:
    MsgBox Err.Description
    Resume Exit_Command16_Click
End If

End Sub

Top

只如初见发表于：2014-08-29 12:24:28

我又试了下，好像点否也保存，只是不自动跳到下一条了，求解。。。

Top

飘摇王发表于：2014-08-29 14:02:58

vbYesNoCancel 该如何使用？

http://www.accessoft.com/bbs/showtopic.asp?id=9930

Top

飘摇王发表于：2014-08-29 14:12:39

If MsgBox("此数据已编辑，是否保存？", vbQuestion + vbYesNo) = vbNo Then Exit Sub

试试

Top