Dim sair As Integer
sair = MsgBox("Tem certeza que deseja encerrar.", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Atenção")
If sair = vbYes Then
End
Else
e.Cancel = True
End If
A mente que se abre a uma nova idéia jamais voltará ao seu tamanho original. Albert Einstein
0 comentários:
Postar um comentário