Hi,
Here's a code snippet for a simple search using the combo box..I assume your form is bound to one table only say tblCustomer...Add some textbox which are also bound to the table...The combo box is unbound...
In the properties change the row source type to table/query, and the row source to tblCustomer..
Attach the code in the combo box afterupdate() event..
VB Code:
Private Sub Combo8_AfterUpdate() ' Find the record that matches the control. Dim rs As Object 'rs means recordset that will retrieve info in your table 'tblCustomer Set rs = Me.Recordset.Clone rs.FindFirst "[Customer_ID] = " & Str(Nz(Me![Combo8], 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark End Sub
Regards,
![]()
![]()
![]()




Reply With Quote