Prova a fare il debug dell'applicazione e metti un breakpoint
sull'istruzione :
codice:
DataEnvironment.rsTabella.Find Me.cmbRicerca.Text & " Like '" & Me.txtRicerca.Text & "'"
Quando il codice esegue questa istruzione ?

Premesso che all'inizio sia la cmbRicerca.Text che txtRicercaText
possono valere "", e questo spiega perchè ti estrae tutti 12 record
presenti in tabella.

Mi chiedo quindi 'dove' hai messo l'istruzione di cui sopra.
Dovresti inserirla nell'evento _Change della txtRicercaText.
Ma in questo modo ti scatena una Find ad ogni carattere digitato.

Forse ti converrebbe mettere un bottone 'Cerca' e nel Click di
questo bottone mettere l'istruzione.