Visual Basic - VB6001:Manejo de Registros :TextBox y Cuadricula

Deseo ir ingresando Caracteres en el un textbox y que aparesca todas las ocurrencias en un DBGrid o MSFlexGrid .
Tengo la idea pero no se en realidad como hacerlo ya que soy nuevo con Referencias ADO y no tengo manuales.
Esta es mi idea:

Private TxtCodEmp_Clic()

Busca=TxtCodEmp.text
SQl= Select * from Empleado Where CodCli Like 'Busca*'
MsFlexgrid.Llenar=Sql 'Puse llenar por que no se la propiedad

Algo asi miren:

CODIGO EMPLEADO
********************
*A *
********************

****************************************
* COD EMP * NOMBRE * PAIS *
****************************************
*AA001 * ALDOLFO * PERU *
****************************************
*AA002 * BETTY * CHILE *
****************************************
*AA003 * CAROLA * ARGENTINA *
****************************************
*AB001 * DELIA * COLOMBIA *
****************************************
*AB002 * ELENA * PERU *
****************************************
*AB003 * FABIOLA * VENEZUELA *
****************************************
*AC001 * GABY * URUGUAY *
****************************************
*AC002 * HUGO * PERU *
****************************************

CODIGO EMPLEADO
********************
*AB *
********************

****************************************
* COD EMP * NOMBRE * PAIS *
****************************************
*AB001 * DELIA * COLOMBIA *
****************************************
*AB002 * ELENA