tieutri912 > 01-06-12, 09:27 AM
Private Sub Command12_Click()
If MsgBox("Ban chac chan muon luu mau tin ?", vbQuestion + vbYesNo, "Save Record?") = vbNo Then
DoCmd.RunCommand acCmdUndo
Else
[color=#FFD700]DoCmd.GoToRecord , , acNewRec[/color]
DoCmd.OpenQuery "TONG_TIEN", acViewNormal, acEdit
End If