Как да попълните текстови полета с многоколонния разгъващ се списък избор

Умерено: Изисква основни макро кодиране и съвместна работа умения.


Тази статия се отнася за база данни на Microsoft Access (.mdb) и проект на Microsoft Access (.adp).


За Microsoft Microsoft Access 2000 версия на тази статия вижте 322900.

За Microsoft Microsoft Access 97 версия на тази статия вижте 322901.

Резюме

Тази статия обяснява как да се попълни няколко текстови полета с избора в многоколонния комбинирано поле и след това запишете съдържанието на текстови полета като един запис в таблицата.

Допълнителна информация

Внимание: Ако следвате стъпките в този пример, промяна примерна база данни Northwind.mdb. Можете да архивирате файла Northwind.mdb и следвайте стъпките на копие на базата данни.

Microsoft предоставя примери само за илюстративни цели без изрични или подразбиращи се. Това включва, но не е ограничено до, подразбиращи се гаранции за продаваемост или годност за определена цел. Тази статия се предполага, че сте запознати с демонстрирания език за програмиране и инструментите, които се използват за създаване и процедури за отстраняване на грешки. Инженерите на поддръжката на Microsoft могат да помогнат с обяснение на функциите на конкретна процедура, но няма да могат да модифицират тези примери с цел осигуряване на допълнителна функционалност или създаване на процедури за удовлетворение на конкретните ви изисквания. Да актуализирате текстови полета с направените в няколко колони комбинирано поле, използвайте следните стъпки:

  1. Отворете базата данни на примерни Northwind.mdb.

  2. Създаване на нова таблица в Northwind.mdb, която включва следните полета: Table: Table1
    ----------------------
    Field Name: ID
    Data Type: Autonumber
    Primary Key
    ---
    Field Name: FirstName
    Data Type: Text
    ---
    Field Name: LastName
    Data Type: Text
    ---
    Field Name: Title
    Data Type: Text

  3. Създаване на нов формуляр в Northwind.mdb, която съдържа следните проверки: Form: Form1
    ----------------------
    RecordSource: Table1
    ---
    Control Type: Text Box
    Name: txtFirstName
    ControlSource: FirstName
    ---
    Control Type: Text Box
    Name: txtLastName
    ControlSource: LastName
    ---
    Control Type: Text Box
    Name: txtTitle
    ControlSource: Title

  4. Добавяне на разгъващ се списък на Form1. В съветника на разгъващ се списък изпълнете следните стъпки:

    1. Щракнете върху искам комбинираното поле за търсене на стойности в таблица или заявкаи след това щракнете върху напред.

    2. Щракнете върху таблица: служители, след което щракнете върху напред.

    3. Преместете полетата Фамилия, имеи заглавие от списъка Налични полета към списъка с Избрани полета с всяко поле и след това щракнете върху бутона > . Щракнете върху напред.

    4. Щракнете върху напред, щракнете върху Запомни стойността за следващо използванеи щракнете върху напред.

    5. В полето какъв етикет искате за вашия комбинирано поле въведете Направите избораи щракнете върху Готово.

  5. С десния бутон върху разгъващ се списък, който сте създали в стъпка 4 и след това щракнете върху свойства.

  6. Щракнете върху раздела други и след това въведете cboNames в полето за име .

  7. Щракнете върху раздела събитие , щракнете върху полето След актуализация събитие и щракнете върху бутона изгради (...).

  8. Щракнете върху Конструктор на коди след това щракнете върху OK.

  9. В редактора на Visual Basic, въведете следния код:

    Private Sub cboNames_AfterUpdate()   Me.txtFirstName = Me![cboNames].column(1)
    Me.txtLastName = Me![cboNames].column(2)
    Me.txtTitle = Me![cboNames].column(3)
    End Sub

  10. Затворете редактора на Visual Basic и след това отворете Form1 формуляр в изглед за формуляри.

  11. Щракнете върху елемент в списъчното поле и след това щракнете върху Следващия запис. Повторете тази стъпка за всеки запис, който искате да запишете.

  12. Отворете Table1 според таблица да се уверите, че са записани нови записи. Имайте предвид, че след като щракнете върху елемент в списъчното поле, AfterUpdate то изпълнява събитие процедурата, попълва три текстови полета във формуляра, и нов запис се добавя към Table1.

Нуждаете се от още помощ?

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към Microsoft приобщени

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×