USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Botão de fechar do windows, como enable = false
Leon@rdo
PORTO ALEGRE
RS - BRASIL
Postada em 23/06/2004 15:17 hs            
 
 Boa tarde a todos
 
   Durante um operação não quero que o programa possa ser encerrado para não gerar erro no bd.
   Como faço para desabilitar e abilitar novamente o botão de fechar do meu sistema??
 
        Aguardo resposta!!
     
|-tom-|
Pontos: 2843
CATANDUVA
SP - BRASIL
Postada em 23/06/2004 15:37 hs            
no evento unload do formula´rio vc verfica se existe alguma conexao aberta ou formulario , se tiver aberto vc da uma mensagem e nao cancela o fechamento do programa.
 
 
Ok
 

-------------------------------------------------------------------------------------------------------------------------------------------------------------------------

 tom -Catanduva/SP

Analista Sistemas - Visual Basic 6 - VB.NET

"Confiai perpetuamente no Senhor, porque o Senhor Deus é uma Rocha Eterna"

                                                                                              Isaías 26:4  Emoções 

 

     
THECRAZY
Pontos: 2843
BRASÍLIA
DF - BRASIL
Postada em 23/06/2004 15:54 hs            
Olá !!
Outra opção é criar uma variável Booleana e no evento Unload do Form, fazer uma verificação :
 
Dim PodeSair as Boolean 'variável que pode sair
 
No evento que faz a sua operação importante, coloque assim no inicio do código :
 
PodeSair = False
 
No final do código coloque assim :
 
PodeSair = True
 
E no evento Unload do FOrm, digite :
 
If PodeSair = false then
         Cancel = 1
else
        Cancel = 0
end if
 
 
At+
 

  Eu sou o alfa e o ômega, o princípio e o fim, diz o Senhor, que é, e que era, e que há de vir, o Todo Poderoso. (Ap 1.8)
     
Anjo Negro
SÃO GONÇALO
RJ - BRASIL
Postada em 23/06/2004 17:39 hs            
ou assim, no evento unload_form
 
if sair = false then
  exit sub
end if
 
Que assim ele não vai deixar concluir a função que é para desligar.

_______________________

Anjo Negro

anjonegro86@ibest.com.br

     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página