Visual Basic Code , VB.NET Code, VB Code
  Home   :  Code   :  Forums   :  Submit   :  Mailing List   :  About   :  Contact


problem to end a program


problem to end a program

Author
Message
zorro591
zorro591
Forum God
Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)

Group: Forum Members
Posts: 2, Visits: 5
Hello, I create a software hack the passwords of winrar and winzip file? I have a problem with the end, can you help me to my problem. Thanks for your help.



Public Class Form1



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

TextBox1.Text = OpenFileDialog1.FileName

End If

End Sub



Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Timer1.Enabled = True

End Sub



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

If ProgressBar1.Value = ProgressBar1.Maximum Then

Timer1.Enabled = False

Else

ProgressBar1.Value = ProgressBar1.Value + 1



End If

End Sub



Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

Label1 where I marked "Password"

End Sub



Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged

richTextBox1 it will display the 1/2 or successful password / password error

End Sub

End Class
zorro591
zorro591
Forum God
Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)Forum God (636 reputation)

Group: Forum Members
Posts: 2, Visits: 5
Public Class Form1



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

TextBox1.Text = OpenFileDialog1.FileName

End If

End Sub



Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Timer1.Enabled = True

End Sub



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

If ProgressBar1.Value = ProgressBar1.Maximum Then

Timer1.Enabled = False

Else

ProgressBar1.Value = ProgressBar1.Value + 1



End If

End Sub



Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

Label1.Text = "Password"

End Sub



Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged

If RichTextBox1.Text = "Password succesful"

Else

RichTextBox1.Text = "Password error"

End If

End Sub

End Class



here I find but can you help me or I can put the frutforce in the program?
GO


Similar Topics


Reading This Topic


Login
Existing Account
Email Address:


Password:


Social Logins

Select a Forum....

















A1VBCode Forums


Search