Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #58 da revista programar. Faz já o download aqui!

tiagopedro

Fechar todos os forms do programa

Mensagens Recomendadas

tiagopedro    0
tiagopedro

Estou a tentar programar uma opção 'sair' de um stripmenu que termine o programa, mas que antes envie um MsgBox cujo resultado afirmativo resulte no fecho do programa. Qual é o meu erro no código?

MsgBox("Tem a certeza que deseja sair?" + vbCrLf + "Caso não tenha guardado a ficha do paciente, todos os dados serão perdidos.", MsgBoxStyle.YesNo, "Sair")
 Dim result As MsgBoxResult
 If result = MsgBoxResult.Yes = True Then
	 End
 End If

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
nelsonr    333
nelsonr
Dim result As MsgBoxResult
result = MsgBox("Tem a certeza que deseja sair?" + vbCrLf + "Caso não tenha guardado a ficha do paciente, todos os dados serão perdidos.", MsgBoxStyle.YesNo, "Sair")
If result = MsgBoxResult.Yes Then
 End
End If

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
He B TeMy    37
He B TeMy

Tu nunca devias usar o "End" no fecho duma aplicação, isso simplesmente crasha-te a aplicação sem mostrar nenhum erro,

Usa a function

Application.Exit()

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.