Tutti quei DoEvents li hai messi per cercare di risolvere il problema o per qualche altro motivo? Hai provato a toglierli?