Chee Gracias! la verdad es que el ingles no es problema para mi estuve como 7 años en un curso
ya mismo lo checo...!!!
Thanks a Lot!

Thanks a Lot!
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúForm2.Show()
Me.Hide()
Return
Private Sub TextBox1_Validated
, hagan esto con todas las TextBox1,2,3,4.
If TextBox1.Text = "4267" And TextBox2.Text = "9175" And TextBox3.Text = "7854" And TextBox4.Text = "2546" Then
Button1.Enabled = True
Return
End If
Button1.Enabled = False
Imports System.Threading
Dim Hebra As Thread
Private Sub Thread_1()
el Codigo
End Sub
Private Sub Button1_Click
Hebra = New Thread(AddressOf Thread_1)'El Sub Thread_1 como ya dije es opcional pueden poner el que les de la gana'
Hebra.Start()
End Sub