2015-11-16 3 views
0

У меня проблема здесь (очень простая проблема, но я не могу ее решить). У меня есть кнопка сохранения в форме, использующей коды vba для сохранения записи (Do.Cmd.Save). Но, к сожалению, это не функция. Здесь я помещаю коды ниже. Спасибо за вашу любезную помощь!ms доступ vba save button not function

Private Sub Command110_Click() 

'Provide the user with the option to save/undo 
'changes made to the record in the form 

If MsgBox("Changes have been made to this record." _ 
    & vbCrLf & vbCrLf & "Do you want to save these changes?" _ 
    , vbYesNo, "Changes Made") = vbYes Then 
     DoCmd.Save 
    Else 
     DoCmd.RunCommand acCmdUndo 
End If 

End Sub 

ответ

1

DoCmd.Save сохраняет изменения объекта доступа (например, запрос или форму определения).

Чтобы сохранить запись, используйте

DoCmd.RunCommand acCmdSaveRecord 
+0

Отлично! спасибо @ Andre451 – finazrosli

+1

Тогда вы можете принять [прием] (http://stackoverflow.com/help/someone-answers) ответ. :) @finazrosli – Andre