MENSAGEM AO SAIR DO PROGRAMA

USUARIO.EXCLUIDOS 16/01/2005 20:12:34
#61283
[txt-size=6]Eu queria pedir para os mais experientes uma ajudinha.
quando eu sair do programa aprecer a mensagem sim eu saio naum eu continuo no programa [/txt-size]
SHEEPJE 16/01/2005 20:23:12
#61284 Resposta escolhida
Private sub Command1_Click()
Dim VarResposta As Integer
VarResposta=MsgBox("Deseja realmente abandonar?", vbYesNo + vbQuestion,"Saída do Sistema")
if VarResposta = vbYes Then End
End Sub

Private sub form_unload(cancel As Integer)
cancel = MsgBox("Deseja realmente abandonar?", 292, "Saída do Sistema") = vbNo
End Sub


Espero q sirva
FELIPEA 16/01/2005 20:48:35
#61286 
Private Sub Form_Unload(Cancel As Integer)
    If MsgBox ("Vc deseja sair?", vbQuestion + vbYesNo, "Sair" ) = vbYes Then
        End
    Else
        Cancel = true
    End If
End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar