tabela.Filter = "Campo que populou o combo='" & cboCliente.Text & "'"
Usar os apóstrofes se o campo for texto (acredito que vc já saiba isso).
if not tabela.eof then
use o valor retornado
end if
End if
End Sub
Estou partindo do ponto, onde a sua tabela estaria aberta.
Caso contrário, vc deverá abrir a tabela usando uma instrução sql mais ou menos assim:
sqlstr = "Select * From Tabela Where Campo = " & combo1.text
e executá-la.
T+
Cá