Visual Basic - ayuda para eliminar registro desde una tabla

tengo la siguiente definicion:

Public BD_Egresos As DAO.Database

Set TB_Censo = BD_Egresos.OpenRecordset("corte censal", dbOpenTable)

y necesito eliminar todos los registros de la tabla "corte censal".
¿ como tendria q ser el codigo para borrar los registros?

Gracias por cualquier ayuda
Rosy
Valparaiso, Chile

If TB_Censo.RecordCount <> 0 then
TB_Censo.movefirst
Do while TB_Censo not eof
TB_censo.Delete
TB_Censo.MoveNext
Loop
else
MsgBox " Ne existen registros para borrar"
EndIf
Suerte