автоматически увеличивать поле в форме MS Access 2016 - PullRequest
Новая
       4

автоматически увеличивать поле в форме MS Access 2016

0 голосов
/ 26 ноября 2018

Я создаю базовую форму и хотел бы, чтобы поле id в форме автоматически увеличивалось, когда пользователь открывает форму (или может быть и другим событием, просто подумал, что это проще всего).

Я написал следующий код vb, но, похоже, есть проблема: 

Private Sub Form_Load()    

    lngNextID = DMax("[portfolio_id]", "table1") + 1
    Form 1.portfolio_id = lngNextID

End Sub

table1 - это таблица, которую я хочу, чтобы vb искал следующий шаг.Моя форма называется «Форма 1», а поле в той форме, к которому я ищу автоинкремент, - portfolio_id.

Любые советы / изменения будут полезны, спасибо.

1 Ответ

0 голосов
/ 26 ноября 2018

Попробуйте с: 

Forms("Form 1").portfolio_id = lngNextID

или более простым: 

Me!portfolio_id = lngNextID

Однако, это обновит начальную запись, поэтому попробуйте установить DefaultValue (aстрока): 

Me!portfolio_id.DefaultValue = "'" & lngNextID "'"
...