Ho scritto:
Se ci sono errori in questo codice è perchè ho sbagliato nella trascrizione, quello che ho nel compilatore è giusto.codice:dim activechild as form = me.activemdichild For each activechild in me.mdichildren if activechild.Text = "Fatture" then Fatture.focus() end if Next
Al momento di Fatture.focus non succede niente.