MSG AO FECHAR

USUARIO.EXCLUIDOS 28/07/2005 18:03:48
#96468
Galera como eu faço para aparecer uma caixa de confirmçao de saida, qnd o usuario clicar no "x" do form/??
FORMIGINHA 28/07/2005 18:06:18
#96469
Resposta escolhida
faça assim:



Private Sub Form_Unload(Cancel As Integer)
If MsgBox(" deseja sair?", vbYesNo) = vbYes Then
End
Else
Cancel = True
End If
End Sub

finalize o topico.
FELIPEA 28/07/2005 18:06:43
#96470
Sub Form_QueryUnload(cancel as integer)
If MsgBox("Deseja sair?") = vbNo Then Cancel = True
End Sub
FELIPEA 28/07/2005 18:08:34
#96472
Opa.. respondemos juntos =P
FORMIGINHA 28/07/2005 18:10:20
#96474
mais eu respondi primeiro.
FORMIGINHA 28/07/2005 18:22:37
#96478
encerre o topico.
Tópico encerrado , respostas não são mais permitidas