Как очистить записи для одной таблицы с несколькими таблицами в одной форме - PullRequest
0 голосов
/ 06 февраля 2019

Я создал единую форму с несколькими таблицами в Access 2016. Я пытаюсь выяснить, как можно использовать кнопки, чтобы сделать только часть формы понятной для ввода новой записи.

Эта форма собираетсяиспользоваться на складе для измерений.Он будет содержать 1 место с несколькими проходами, а затем каждый проход будет иметь несколько стеллажных систем.Когда мы измеряем местоположение, информация не изменится.Проход изменится только после того, как будут измерены все стойки.

Для этого мне понадобится форма, чтобы иметь возможность создавать новые записи при переходе на новые стойки и затем менять проходы после того, как я закончу всестойки.

Если бы это была одна форма с несколькими подчиненными формами, это было бы проще, чем то, как я пытаюсь это сделать?

Я смотрел на docmd.gotonewrecord, а также gotorecordно ни один из них не работает только для определенных полей:

Private Sub btnNextUpright_Click()

    Dim ctrl As Control

    txtaisleID.SetFocus

    For Each ctrl In Me.Controls

        If ctrl.Tag = "upright" And TypeName(ctrl) = "TextBox" Or TypeName(ctrl) = "Combobox" Then

        DoCmd.GoToRecord , , acNewRec

        End If

    Next


End Sub

Я ожидаю, что у меня будет кнопка для 3 частей формы доступа.

Один очистит нижнюю треть, другойочистит нижние две трети, а затем последняя очистит всю форму.

Ниже приведены таблицы, перечисленные с ключами

tblLocation
-расположение (первичный ключ)
-inspectby
-inspectdt

tblAisle
-aisleID (первичный ключ)
-beamcnt
-uprightcnt
-2beam
-4beam
-6beam
-8beam
-производительность
-профиля
-расположение (Foreign Key tblLocation)

tblUpright
-uprID (первичный ключ)
-frntbck
-sideside
-aisleID (внешний ключ tblAisle)

tblBeam
-beamlvl
-bmlvlpass
-bmlvlfail
-bmlvlnotes
-uprID (внешний ключ tblUpright)
-ID (первичный ключ)

Дизайн формы

Если вы посмотрите на форму, я пытаюсь написать код, который добавит новую запись в tblBeam и tblUpright при нажатии кнопки NEXT UPRIGHT. Я попытался выполнить ADDNEW, но он очищает всю форму

После этого мне нужно создать еще одну кнопку «СЛЕДУЮЩИЙ», которая добавит новую запись во все таблицы, кроме «tblLocation»

...