Автоматически заполнять поля в форме доступа

Question

Каков самый простой способ получить MS Access 2007 для автозаполнения формы на основе записи, добавленной в первом поле?

В настоящее время у меня есть 4 стола .... Клиенты, детали, заголовок заказа и строки заказа. Я создал форму для таблицы заголовков заказов с подформой для строк порядка.

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

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

Теперь я знаю, большинство из вас, ребята, это хлеб и масло, но, пожалуйста, объясните в самой простой форме ... я ни в коем случае не 100% грамотный компьютер.

Answer 1

Вот пример из формы, которую я использую. Он использует Dlookup из таблицы в том же файле .mdb. Вы вводите номер детали, а затем все остальное заполнит после вы попали вкладки:

Private Sub Item_Number_AfterUpdate() 
    PopulateFields 
End Sub 

Private Sub PopulateFields() 
''''PopulateFields takes the Item Number to fill in all the remaining fields with regards to that Item 
    Me.Full_Desc = RTrim(DLookup("ITEMDESC", "GP_Parts_List_Import", "ITEMNMBR = '" & Me.Item_Number & "'")) 
    Me.Item_Type = RTrim(DLookup("ITEMTYPE", "GP_Parts_List_Import", "ITEMNMBR = '" & Me.Item_Number & "'")) 
    Me.General_Desc = RTrim(DLookup("ITMGEDSC", "GP_Parts_List_Import", "ITEMNMBR = '" & Me.Item_Number & "'")) 
    Me.Current_Cost = RTrim(DLookup("CURRCOST", "GP_Parts_List_Import", "ITEMNMBR = '" & Me.Item_Number & "'")) 
    Me.Item_Class_Code = RTrim(DLookup("ITMCLSCD", "GP_Parts_List_Import", "ITEMNMBR = '" & Me.Item_Number & "'")) 
End Sub 

UPDATE

Чтобы попасть в VBA часть вашего приложения, нужно нажать клавишу F11 или щелкните правой кнопкой мыши на элементе управления, который требуется запуская код. После щелчка правой кнопкой мыши выберите «Build Event», а затем выберите «Code Builder», чтобы открыть окно редактора VBA.

Выпадающий слева объект даст вам каждый элемент управления, который вы можете выбрать в этой форме, а выпадающий справа даст вам каждое событие, доступное для управления. Поэтому, когда заполняется текстовое поле Item_Number, и пользователь перемещается, запускается AfterUpdate и запускает функцию PopulateFields.

Очевидно, вам нужно будет заменить текстовые поля и имена таблиц, и это единственный способ сделать это. Но надеюсь, что это поможет.