Sí pero a mi juicio el codigo anterior es antieficiente porque se tarda demasiado, si estas conectado a un servidor es mas facil, que ejecutes lo siguiente
private sub borradoVer3()
      dim cn as adodb.connection
      set cn = myForm.adodc1.recordset.activeconection
      cn.execute "delete from table"
      set cn = nothing
      ' nothing more to do , thanks.
end sub
saludos.
Roberto. 
