MS 액세스 콤보 상자

MS 액세스의 새로운 양식이며 찾고있는 몇 가지 사항을 자동으로 채우는 콤보 상자가있는 양식을 만들었습니다. 기본적으로 이름, 전화 번호 및 날짜를 확인합니다. . "체크 인 날짜"에 대한 다른 텍스트 상자를 추가하고 날짜를 입력 할 수 있지만 자동 채우기 콤보 상자에 표시되는 레코드가 아닌 정보를 가져 오는 테이블의 첫 번째 레코드가 업데이트됩니다. 누구든지 자동 채우기 디스플레이 대 테이블의 최상위 레코드를 업데이트하는 수정 프로그램을 알고 있습니까?MS 액세스 콤보 상자

Private Sub Combo0_Change() 

Me.txtfname = Me.Combo0.Column(1) 
Me.txtlname = Me.Combo0.Column(2) 
Me.txtphone = Me.Combo0.Column(3) 
Me.txtpump = Me.Combo0.Column(4) 
Me.txtdateissue = Me.Combo0.Column(5) 
Me.txtduedate = Me.Combo0.Column(6) 
Me.txtCheckInDate = Me.Combo0.Column(7) 

End Sub 




Private Sub Combo0_Click() 

End Sub 

Private Sub txtCheckInDate_Change() 

End Sub

출처

2016-10-03 Pmanivong

처럼, 해당 소스 + 필터에 소스를 변경 Combo0 콤보의 소스를 얻을 [최소, 완전하며 검증 가능한 예제] (http://stackoverflow.com/help/mcve). – MJH

콤보 상자는 현재 열려있는 레코드 (즉, 첫 번째 레코드)를 채우는 것입니다. 따라서 최고 레코드 만 업데이트하고있는 것입니다. 먼저 업데이트하려는 레코드로 이동하고 (docmd.findrecord 조사) 현재 레코드를 업데이트해야합니다. 귀하의 양식이 업데이트중인 테이블에 바인딩되어 있다고 가정합니다. 다른 옵션은 양식의 레코드 소스를 변경하는 것입니다. – geeFlo

옙, 테이블에 바인딩되어 있습니다. – Pmanivong

다음 Private Sub txtCheckInDate_Change() 기능에서는,을 포함하도록 질문을 편집하십시오

Me.Combo0.RowSource = "[Existing Combo Source SQL]" & _ 
" WHERE [YourDateField] = #" & me.txtCheckInDate & "#"

출처

2016-10-04 12:31:27

멍청한 놈처럼 들리는데 싫지만, 접근하기가 매우 쉽습니다. combo0의 소스를 말할 때 무엇을 의미합니까? – Pmanivong

속성의'RowSource' –

MS 액세스 콤보 상자

답변

관련 문제