EVENTO FECHAR FORM DO VB6

MESTRE 29/01/2014 13:49:20
#433806
Galera to precisando de uma dica de voces..

Não posso deixar o usuário fechar o form sem salvar (clicando no X) sem salvar.. qual o evento do form fechar?seria o Unload?? queria que se o usuário não clicar no botão gravar e no X apareça uma mensagem informando que os items não foram salvos e não sair tipo exit sub.

Fiz dessa forma apenas para teste.. só que da um erro: vb6.exe The instruction at [Ô]0x7e4291bf[Ô] referenced memory at [Ô]0x000000000[Ô]. The memory could not be [Ô]read[Ô] e o vb6 fecha e o projeto encerra.
[th][/th]
Private Sub Form_Unload(Cancel As Integer)
If MsgBox([Ô]Deseja mesmo sair?[Ô], vbYesNo + vbQuestion, [Ô]Sair[Ô]) = vbYes Then
End
Else
Cancel = True
End If
End Sub
MESTRE 29/01/2014 14:00:39
#433808
Consegui

[th][/th]
Private Sub Form_Unload(Cancel As Integer)
If MsgBox([Ô]Deseja mesmo encerrar o programa?[Ô], vbQuestion + vbYesNo, [Ô]Sair[Ô]) = vbNo Then
Cancel = 1
End If
End Sub
Tópico encerrado , respostas não são mais permitidas