Olá Ninh@,
Quando você abrir o recordset, seja via ADODC, DataControl ou código, inclua uma cláusula de ordenação:
Select * From Custos Order By Codigo;
Veja a cláusula Order By, nela eu coloco o campo que eu quero ordenar, desta forma os registros são carregados em ordem crescente de código. Se quiser a ordem decrescente, basta adicionar a cláusula Desc ao final do código.