Espero y este videotutorial sea de vuestro agrado.
Aquà les dejo el código fuente para que lo analicen y lo pongan en practica. Dudas o sugerencias las pueden hacer a través de las redes sociales, o dejando un comentario..
Public Class Form1
Dim contador As Byte = 4
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If ProgressBar1.Value = 100 Then
Me.Opacity -= 0.07
If Me.Opacity = 0.0 Then
Me.Hide()
PRINCIPAL.Show()
Timer1.Enabled = False
End If
Else
ProgressBar1.Value += 4
If ProgressBar1.Value = contador Then
Else If ProgressBar1.Value = contador + 16 Then
contador += 20
End If
If ProgressBar1.Value = 28 Then
End If
End If
End Sub
gracias por el codigo quisiera hacerte una consulta cuando le doy cerrar al programa principal siempre queda en memoria la ventana de bienvenida como se sale de ahi.
ResponderEliminargracias