Como crear un slash en visual studio 2010

Hola como estas queridos lectores en este tema les enseñare como crear un slash en visual studio 2010, ya que es un tema que muchos le interesa aprender, a la hora de realizar un proyecto.

Lo primero que hay que hacer es crear un nuevo proyecto en visual basic 2010, elegimos aplicación de Windows forms.

Nos aparecerá la ventana principal de nuestro formulario donde empezaremos a dar la forma que uno quiera.

 Luego nos posicionamos el panel de propiedades y elegimos la opción StartPosition y elegimos la opción de CentrerScreen, para posicionar el formulario a la hora de la ejecución en el centro de la pantalla.

Procesemos a ir a la opción de FormBorderStyle y elegimos la opción de None. ahora realizamos lo que es la creación de los controles para eso necesitamos los siguiente controles:

• (1) Time
• (1) Progressbar
• (2)  Label

Posteriormente vamos  a crear otro formulario para eso vamos a explorador de soluciones en la parte donde dice Slash.vb le damos un clic derecho, se nos abrirá un menú contextual y elegimos a opción agregar, luego elegimos la opción windows forms.

Después de haber colocado los controles correspondientes vamos a lo que es la inserción del código para esto le damos doble clic al cualquier parte del formulario y declaramos una variable de tipo BYTE,  llamada contador la cual  la iniciamos en 0, esta sera declarada en la parte del esqueleto de nuestro formulario  es decir después de 

Public Class Form1

 Dim contador As Byte = 0

Luego damos doble clic al Timer1 inmediatamente nos enviara al código del Timer, donde procederemos a introducir el siguiente

Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick

        If ProgressBar1.Value < 100 Then

            contador = contador + 20

            Label1.Visible = True

            Label1.Text = "Cargando Datos"

            ProgressBar1.Value = contador

        Else

            Me.Hide()

            Form2.Show()

            Timer1.Enabled = False

        End If

    End Sub

Esto dice que si el progressbar1, en su propiedad value  es menor a 100 entonces que me llame mi variable contedor la cual ha iniciado en 0 y le vaya sumando de 20 en 20. Hasta llegar a 100, si esta condición se complete entonces mi Label1 en su propiedad visible pasara a true  y mostrara un mensaje que diga “Cargando Datos” y el Progressbar se empezará a llenar.

De lo contrario me mostrar mi formulario2 y el time se detendrá.

en la parte del formulario1 en su evento Load ponemos el siguiente código

 Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

        Timer1.Start()

        Label1.Visible = False

    End Sub

una ultima cosa en el Time1 en su propiedad Interval lo ponemos en 1000 

Eso es todo amigos comenten si tienen alguna duda