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

Matcher

Timer a fechar forms

Mensagens Recomendadas

Matcher    0
Matcher

Boas!

Tenho um jogo em vb.net e tenho uma lanhouse, com um timer para 15 minutos, ao dar o tick era suposta as forms fecharem mas não fecham. Tenho uma msgbox, ela aparece o que significa que tá a funcionar, mas as forms é que não fecham.

Dim acabou As Boolean = False
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
 If acabou = False Then
	 acabou = True
	 MsgBox("O teu tempo na lan house acabou.")
	 Browser.Close()
	 sistemaoperativo.Close()
	 loginoperativo.Close()
	 paint2.Close()
	 painti.Close()
	 musica.Close()
	 calculadora.Close()
	 haskear.Close()
	 haskear1.Close()
	 Button1.Enabled = True
	 Button2.Enabled = False
	 Timer1.Stop()
	 acabou = False
 End If
End Sub

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
He B TeMy    37
He B TeMy

Ora bem... o que é que não fecha exactamente? Mostra a declaração das variáveis para perceber melhor.

E tu podes remover a variável "acabou", visto só tar aí a ocupar espaço.

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Muryllo    8
Muryllo

Me lembro uma vez de usar timer para fechar forms e isso me resultar em vários erros. Experimenta primeiro criar uma rotina e por isso aí tudo que será fechado nela, depois brinca com o timer e posta aqui o resultado. Já é meio caminho andado.

Partilhar esta mensagem


Ligação 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.