Visualizzazione dei risultati da 1 a 6 su 6
  1. #1
    Utente di HTML.it L'avatar di gatto012
    Registrato dal
    Sep 2002
    Messaggi
    1,726

    [VB6] finestrina di salvataggio alla chiusura del form

    salve, ho un programmino in vb, vorrei fare in modo che chiudendo la form ( quando premo X nell' angolo in alto a destra ), mi appaia una specie di msgbox con due tasti ( SI e NO, che se premo si esegue una serie di istruzioni per salvare e chiude, se premo no chiude direttamente )

    qualche idea? non riesco a capire come far ad apparire la msgbox nel momento stesso in cui clokko nalla x di chiusura...

  2. #2
    Moderatore di CMS L'avatar di kalosjo
    Registrato dal
    Jul 2001
    residenza
    In culo alla luna
    Messaggi
    1,999
    Nell'evento QueryUnload del form metti la domanda.

    Se viene risposto si (uscire) alloranon fai niente, altrimenti metti cancel=1

    Nota che cancel è uno dei parametri passati nel form...
    Scusate i puntini di sospensione...... La verità è che non ho argomenti....

  3. #3
    Utente di HTML.it L'avatar di gatto012
    Registrato dal
    Sep 2002
    Messaggi
    1,726
    sorry non sono molto pratico e sono alle prime armi, non ho capito bene

    dovrei fare una specie di sub ( tipo la sub form_load ) ma che funga quando chiudo?

    qualcosa del genere per intenderci:

    Private Sub Form_Unload()
    MsgBox
    End Sub
    o mi sbaglio?

  4. #4
    Moderatore di CMS L'avatar di kalosjo
    Registrato dal
    Jul 2001
    residenza
    In culo alla luna
    Messaggi
    1,999
    Ti sbagli

    L'evento QueryUnload esiste già.

    Basta che proprio in quell'evento metti il messaggio di avviso.

    Se la risposta è di non uscire scrivi

    cancel=1
    Scusate i puntini di sospensione...... La verità è che non ho argomenti....

  5. #5
    Moderatore di CMS L'avatar di kalosjo
    Registrato dal
    Jul 2001
    residenza
    In culo alla luna
    Messaggi
    1,999
    codice:
    Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    
      If MsgBox("Attenzione vuoi uscire?", vbQuestion + vbYesNo) = vbNo Then Cancel = 1
    
    End Sub
    Scusate i puntini di sospensione...... La verità è che non ho argomenti....

  6. #6
    Utente di HTML.it L'avatar di gatto012
    Registrato dal
    Sep 2002
    Messaggi
    1,726
    capito.... grazie

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.