[kapetang]

Γιάννη, καλημέρα

Μελετώντας τον κώδικα, για την αναζήτηση με βάση τον αριθμό τηλεφώνου, έχω την εντύπωση ότι μάλλον δεν απαιτείται η κλήση της διαδικασίας ShowPhones
Private Sub cboCustomer_AfterUpdate()
Me.cboPhone = Null
ShowPhones
End Sub

Private Sub cboPhone_AfterUpdate()
If Not IsNull(Me.cboPhone) Then
Me.cboCustomer = Me.cboPhone 'πυροδοτεί το συμβάν cboCustomer_AfterUpdate
End If
ShowPhones 'μάλλον δεν απαιτείται
End Sub

Φιλικά/Γιώργος