ProgrammerNazaryman

Untitled

Mar 22nd, 2012
110
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.        
  2.         If Login(TextBox1.Text, TextBox2.Text) Then
  3.             Me.Hide()
  4.             downloader.Show()
  5.         Else
  6.             MsgBox("Incorrect Username/Password")
  7.         End If
  8.  
  9.  
  10.     End Sub
  11.  
  12.     Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
  13.  
  14.     End Sub
  15.  
  16.     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  17.         System.Diagnostics.Process.Start("www.hackershost.in/register.php")
  18.     End Sub
  19.  
  20.     Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
  21.  
  22.     End Sub
  23.  
  24.     Private Sub Loginvb_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  25.         AcceptButton = Button1
  26.     End Sub
  27.  
  28.     Private Sub Button1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button1.KeyDown
  29.        
  30.     End Sub
  31.  
  32.     Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click
  33.  
  34.     End Sub
  35. End Class
Advertisement
Add Comment
Please, Sign In to add comment