Facil,
primero tenes tu recordset rsCompras
rscompras te jala datos de la tabla compras, no creo necesario explicarte como, ya hecho el recordset lo filtras asi
utiliza un control llamado mask edit box de los componentes de Visual Basic
lo formateas __/__/____
Es importante que sepas que se debe trabajar con formato de año en cuatro digitos pues las bases de datos tienden a confundir 03 con 1903
me explico?
luego:
if rscompras.state=adStateOpen then
rscompras.close'por si esta abierto lo cerramos
end if
'filtrando Datos
rscompras.open "select * from compras where IdCompras=" & txtcompras & " ",cn,adlockOptimistic
'pasando informacion a el dataGrid
set DataGrid1.Datasource=rs
y te lo llena con la informacion necesaria.Estamos?