Visual Basic - Eliminacion de Registros en 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!!