un DoEvents dopo l'assegnazione della caption e si sistema tutto