Visual Basic - Eliminar registros borrados DBF

Necesitaria saber como puedo hacer para eliminar todos los registros marcados como borrados (PACK) en una DBF de DBfase desde mi programa en VB6. La DBF la estoy abriendo de la asi:

Set DB1 = OpenDatabase(cPATH, False, False, "dBASE 5.0")
Set RS1 = DB1.OpenRecordset("Select * from CABVEN")

Donde cPATH es una variable que contiene el path y el nombre de una DBF.

Muchas gracias de antemano a todos!!

la única manera de borrar definitivamente estos apuntes es desde el programa de DBASE o bien desde DBUCLIPPER esternos de VB
también hay otra manera que es la que yo hago y es la siguiente:
Tengo una base de datos totalmente vacia para poder realizar copia de ella, hago una copia en un archivo llamado temporal.dbf
abro la base de datos y establezco un bucle mientras no sea fin de fichero y voy capturando todos los datos de la misma, cuando he capturado
los datos abro la otra base (temporal) y los traspaso, al terminar cierro las dos bases, borro la original y la temporal la renombro con el nombre de la original
y vuelvo a abrir la base, de esta manera los apuntes eliminados ya no están.
si quieres algo mas escribeme a mi correo
saludos

Gracias Campeón me diste una idea barbara!!!!