Помогите, перевести код из Делфи в vba Access
понимаю, что за чем, а реализовать не могу, очень давно в Делфи с помощью книг наваял

dbModule.TableStore.Append;
if InputForm.ShowModal=mrOk then
    begin
       dbModule.TableStore.FieldByName('S_Quantify').AsFloat := 0;
       dbModule.TableStore.Post;
    end
    else dbModule.TableStore.Cancel;

Как в vba добавить запись в самый конец, т.е. что соответствует Append, Post, Cancel (из Делфи)

И как реализовать ShowModal=mrOk

http://www.sql.ru/forum/1118871/pomogite-razobratsya-s-kodom