여러 열 콤보 상자 선택 영역으로 텍스트 상자를 채우는 방법

  • 아티클
  • 적용 대상:
    Access 2007, Access 2003, Access 2002

보통: 기본 매크로, 코딩 및 상호 운용성 기술이 필요합니다.

이 문서는 Microsoft Access 데이터베이스(.mdb) 및 Microsoft Access 프로젝트(.adp)에 적용됩니다.

요약

이 문서에서는 여러 열 콤보 상자에서 선택한 내용으로 여러 텍스트 상자를 채우고 텍스트 상자의 내용을 표에 하나의 레코드로 저장하는 방법을 설명합니다.

추가 정보

주의

이 예제의 단계를 수행하면 샘플 데이터베이스 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. 각 필드를 선택한 다음 단추를 클릭하여 > 사용 가능한 필드 목록에서 선택한 필드 목록으로 LastName, FirstName 및 Title 필드를 이동합니다. 다음을 클릭합니다.
    4. 다음을 클릭하고 나중에 사용할 값 저장을 클릭한 다음 다음을 클릭합니다.
    5. 콤보에 대한 레이블 지정 상자에서 선택 항목을 입력하고 마침을 클릭합니다.

  5. 4단계에서 만든 콤보 상자를 마우스 오른쪽 단추로 클릭한 다음 속성을 클릭합니다.

  6. 기타 탭을 클릭한 다음 이름 상자에 cboNames를 입력합니다.

  7. 이벤트 탭을 클릭하고 업데이트 후 이벤트 상자를 클릭한 다음 빌드(...) 단추를 클릭합니다.

  8. 코드 작성기를 클릭한 다음 확인을 클릭합니다.

  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
  1. Visual Basic 편집기 종료한 다음 양식 보기에서 Form1 양식을 엽니다.
  2. 콤보 상자에서 항목을 클릭한 다음 다음 레코드를 클릭합니다. 저장하려는 각 레코드에 대해 이 단계를 반복합니다.
  3. 테이블 보기에서 Table1을 열어 새 레코드가 저장되었는지 확인합니다. 콤보 상자에서 항목을 클릭하면 AfterUpdate 속성은 폼의 세 텍스트 상자를 채우는 이벤트 프로시저를 실행하고 새 레코드가 Table1에 추가됩니다.