2014-11-24 11 views
0

액세스 할 때 새로운 작업 지시를 입력하는 양식을 만들었습니다. 내 양식의 텍스트 상자를 콤보 상자의 선택 항목에서 채우고 싶습니다.콤보 상자에서 텍스트 상자 자동 채우기

콤보 상자에는 일련 번호가 나열되고 일련 번호를 선택하면 CompanyName, PurchDate, LastMaintenanceDate, & ModelNo를 채울 수 있습니다. & str을 ([Combo341 ".SerialNo = [SerialNoInfo]"

=을 DLookup ("[회사 명]", "SerialNoInfo"

난을 DLookup의 예를보고 회사 이름 텍스트 상자에이 표현을 시도 ]. [텍스트]))

내가하는 일에 따라 # 유형 또는 # 오류가 계속 발생합니다. 업데이트시 이벤트 코드를 작성하려고하면 아무 일도 일어나지 않습니다. 내가 뭘 잘못하고 있는지 전혀 모르겠다.

+0

은 검색 필드 텍스트 또는 숫자입니까? 텍스트의 경우 구분 기호가 필요합니다. 즉 = DLookUp ("[CompanyName]", "SerialNoInfo", "[SerialNoInfo] .SerialNo = '"& Str ([Combo341]. [Text] & "'"))) –

답변

0

당신은 선택적으로 사용할 수 있습니다

Private Sub COMBOBOX_Change() 

me.TEXTBOXNAME.Text = me.COMBOBOX.Column(X) 

End Sub 

을 TEXTBOXNAME 당신이 데이터를 를 취득하는 콤보 상자를 COMBOBOXis 경우 을 채우려는 텍스트 상자이고, X는 데이터를 컬럼의 수이다 (0에서 시작)

관련 문제