hola buenas tardes estaba haciendo mi pantalla de presentacion, pero parece que el metodo que estoy usando no es el mejor porque cuando cierro el mdi y me fijo en el programa todavia queda como ejecutandose
en mi mdi cuando empiesa el programa lo puse como visible = false
y cuando entraba a al otra pantalla de la presentacion cuando terminara el timer le puse que fuera visible
puse una variable en modulo para que fuera global
le psue ale as integer
codigo del mdi
Private Sub mdi_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If ale = 0 Then
Me.Visible = False
Dim presentacion As New presentacion
presentacion.Show()
End If
End Sub
-----------
codigo de mi timer en mi pantalla de presentacion
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static cont As Byte
If cont = 3 Then
Timer1.Stop()
Timer1.Enabled = False
ale = 1
Dim mdi As New mdi
mdi.Visible = True
Me.Close()
Else
cont = cont + 1
End If
End Sub
codigo del evento loud de mi presentacion
Private Sub presentacion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Enabled = True
End Sub
no se si alguien tiene otra mejor forma o no se porque mi programa queda abierto se el agradece la ayuda
