Prima della tua riga di comando aggiungici queste

DBEngine(0)(0).Execute "DELETE * FROM tabella"
Me.Requery
Me.Refresh