Combo box help

[jsb]

I have a combo box(unbound) for displaying the Customer.
When I select a customer from that, the text box shows
corresponding AcctNo. My problem is, if a Customer has
more than one account, the AcctNo in the text box doesn't
change.
What I should be doing?

This is the code I wrote:

Private Sub Combo1_AfterUpdate()
' Find the record that matches the control.
Dim Rs As Object

Set Rs = Me.Recordset.Clone
Rs.FindFirst "[CUSTOMER] = '" & Replace(Me!
[Combo1], "'", "''") & "'"
Me.Bookmark = Rs.Bookmark

End Sub

 

[Duane Hookom]

At least one reply in a more recent thread.