Σύνθετο πλαίσιο περιορισμός 65Κ

[intefix]

Καλημέρα...Δολεύω σε ένα έργο "Διαχείρισης αιτημάτων Δημοτών"
Σε ένα σύνθετο πλαίσιο έχω τα τηλέφωνα των Δημοτών με τα στοιχεία τους.
Έτσι που όταν παίρνει κάποιος τηλέφωνο καταγράφονται το τηλέφωνο και τα στοιχεία Δημότη, oνοματεπώνυμο και διεύθυνση.
Το πρόβλημα είναι ότι οι δημότες είναι 150.000+ πάνω από 65,535 και το πλαίσιο παίρνει τιμές σαν 16bit ακέραιος και υπάρχει περιορισμός.
Πως μπορώ να αλλάζω το RowSource του ComboBox μετά από 5 πχ αριθμούς Onchange;

[intefix]

Ψάχνοντας βρήκα μια καλή λύση...
Αν το σύνθετο πλαίσιο το το πούμε phone
έχουμε...

Private Sub phone_Change()
Dim strRowSource As String

  strRowSource = "SELECT person_id, phone, l_name, f_name, address  FROM ref_person"
  If Len(Me!phone.Text) = 5 Then
     strRowSource = strRowSource & " WHERE phone Like '"
     strRowSource = strRowSource & Me!phone.Text
     strRowSource = strRowSource & "*'"
     Me!phone.RowSource = strRowSource
     Me!phone.Dropdown
  End If
End Sub