Oppure

Loading
14/04/12 19:26
Come ti era stato suggerito, hai provato a scrivere nel Form1

Private Sub Form_Unload(Cancel As Integer)
  Dim f As Form
  For Each f In Forms
      Unload f
  Next
End Sub
15/04/12 8:51
ampeg
guarda, mi son bastati 5 secondi per capire il problema

nel Command2_Click del Form1hai messo
campovelocità.option1 = True

questa istruzione carica in memoria il form "campovelocità" in quanto viene referenziato l'oggetto option1 e rimane caricato

secondo me dovresi mettere l'istruzione nell'evento Load del form2
e poi nell'evento Unload sempre del form2 lo scarichi: Unload campovelocità


ti spiego:
referenziare un oggetto di un form prima di visualizzarlo equivale a caricarlo
quindi campovelocità.Option1 = True

equivale a:

Load campovelocità
campovelocità.Option1 = True

il form è a tutti gli effetti caricato e va prima o poi scaricato
Ultima modifica effettuata da ampeg 15/04/12 8:54
aaa
15/04/12 13:32
peppino84
ciao cari

la questione dell'option è sacrosanta ... che stupido ...

ho inderito l'unload suggerito in tutti i form

    Private Sub Form_Unload(Cancel As Integer)
      Dim f As Form
      For Each f In Forms
          Unload f
      Next
    End Sub


l'applicazione si chiude nel task... perfetto
il problema è che se stanno aperti più form basta che ne chiuda 1 e si chiudono tutti

grazie a tutti
aaa
15/04/12 15:17
Quel codice non va in TUTTI i form ... t'avevo detto SOLO in quello principale (nel form1 ) ...
17/04/12 16:07
peppino84
giusto ... giusto !!!
ora funziona benissimo !!!!
grazie infinite !!!!
finalmente !!!
grazie ancora
buon lavoro a tutti
bye
aaa
18/04/12 11:19
tippolo
Postato originariamente da peppino84:

ciao cari

la questione dell'option è sacrosanta ... che stupido ...

ho inderito l'unload suggerito in tutti i form

    Private Sub Form_Unload(Cancel As Integer)
      Dim f As Form
      For Each f In Forms
          Unload f
      Next
    End Sub


l'applicazione si chiude nel task... perfetto
il problema è che se stanno aperti più form basta che ne chiuda 1 e si chiudono tutti

grazie a tutti

logico che si chiudano tutti i form
hai inserito questa istruzione
    Private Sub Form_Unload(Cancel As Integer)
      Dim f As Form
      For Each f In Forms
          Unload f
      Next
    End Sub
in tutti i forms
l'istruzione non fa altro che cercare form caricati e chiuderli
tale istruzione la devi inserire solo nel form principale in modo che quando chiudi il SOLO il form principale si chiudono tutti i form
aaa