MSGBOX

USUARIO.EXCLUIDOS 25/03/2005 12:50:48
#74888
FIZ A SEGUINTE MSGBOX"DESEJA SAIR DO SISTEMA" APARECE O BOTAO SIM E NAO .APERTO O NAO E ELE SAI DO MESMO JEITO. COMO DOU PROPRIEDADE AO BOTAO "NAO" PARA ELE NAO SAIR DO SISTEMA??
THIAGO.CESAR 25/03/2005 13:10:08
#74889
Se estiver no evento Unload você coloca assim

If (MsgBox("Deseja sair do sistema", vbQuestion + vbYesNo, "Confirmação") = vbNo) Then 
Cancel = 1
End If
FELIPEA 25/03/2005 13:10:48
#74890 
If MsgBox("Deseja Sair") = vbYes Then 
    End
ElseIf MsgBox("Deseja Sair") = vbNo
   Cancel=True
End IF
FELIPEA 25/03/2005 13:11:41
#74891
Aew Tiago Cezar desculpe, pois qdo fui responder não tinha nenhuma resposta
GUTO 25/03/2005 13:14:57
#74892
meu depende do jeito q vc fez se essa mensagem é do proprio sistema e esta no form Principal If MsgBox(" Você Realmente Gostaria de Sair do Programa?", vbInformation + vbYesNo, "Deita & Dorme Colchões") = vbYes = True Then
Unload Me
mas se vc fez um form que serve de msgBox entau no botao nao coloca Unload me
TONARE25 25/03/2005 13:30:07
#74894 Resposta escolhida
Vale lembrar também que quando for finalizar o sistema é bem interessante fechar e descarregar da memória todos os Forms e DB que estiverem abertos/carregados
USUARIO.EXCLUIDOS 25/03/2005 19:11:40
#74942
coloca ae

if msgBox("Você tem certeza em que deseja sair ?") = vbyes then
end
elseif msgBox("Você tem certeza em que deseja sair ? ") = vbno
cancel=true
end if
THIAGO.CESAR 25/03/2005 19:42:12
#74947
é impressão minha ou você copia as respostas anteriores e posta novamente?
[s77]
EXISTE LIMITES DE CAMPOS EM UM BD ACCESS?
ORDER BY COM MES EM FORMATO DE TEXTO
MSGBOX
INTERROMPENDO LOOP DO... WHILE

é algum tipo de brincadeira?
SIDNEI.PS 26/03/2005 13:24:05
#75026
Se você tem um command button SAIR por exemplo, basta colocar o seguinte código no evento click

If MsgBox("Tem certeza que deseja sair do Sitema??", vbYesNo, "Título") = vbYes Then

unload

endif


ou seja, se a pergunta for respondida com YES, executa Unload... do contrário, não executa nada...

Espero ter ajudado!
USUARIO.EXCLUIDOS 26/03/2005 14:41:14
#75042
Citação:

é impressão minha ou você copia as respostas anteriores e posta novamente?


Tiago.. também percebi.. parece MARACUTAIS de pontos.... rsrsrs

Felipe
Citação:

If MsgBox("Deseja Sair") = vbYes Then
End
ElseIf MsgBox("Deseja Sair") = vbNo
Cancel=True
End IF


Felipe, temos de buscar a OTIMIZAÇÃO... no Código... por EXEMPLO... se a Pessoa NÃO clicar em SIM... aonde ela CLICOU?
Só tem uma RESPOSTA... não é? NÃO....
Sendo assim não precisa VC colocar.. ELSEIF MSGBOX('DESEJA SAIR") = NO...
Basta assim o:
If MsgBox("Deseja Sair") = vbYes Then 
    End 
Else
   Cancel=True 
End IF


TODOS.... na verdade, gosto de colocar nas minhas aplicações a função aqui no site... que fecha na MARRA todos os FORMS... abertos pelo EXE... pois não é de hoje que temos problemas com PROGRAMAS que insistem em FICAR instanciados na MEMÓ“RIA... mesmo depois de um END...
Meu msgbox ficaria assim:
If Msgbox("Tem certeza que deseja SAIR",vbYesNo) = vbYes Then
Sair
End If

Ou seja, um código bem RESUMIDO... se clicar em sair.. e depois clicar em SIM..
Chama a função Sair que fecha na MARRA todos os FORMS... Abertos..
Detalhe... para ver esta função Sair
Veja: Encerrando uma aplicação na MARRA
USUARIO.EXCLUIDOS 26/03/2005 21:31:12
#75125
coloca ae

if msgBox("Você tem certeza em que deseja sair ?") = vbyes then
end
elseif msgBox("Você tem certeza em que deseja sair ? ") = vbno
cancel=true
end if
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar