Código vb:
Ver original
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Start() TextBox1.Enabled = False TextBox2.Enabled = False End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If ProgressBar3.Value = 100 Then MsgBox("LOGIN!", MsgBoxStyle.DefaultButton1, "VRU HACK 7.0") Timer1.Stop() Else ProgressBar3.Increment(1) End If End Sub Private Sub ProgressBar3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar3.Click End Sub
Cuando apreto el boton se ejecuta el timer y se carga la barra y no deja de salir el mensaje LOGIN -.-'