Muchas gracias por tu ayuda pero ammm no me ayudo mucho por que sigo teniendo el mismo problema, te mando mi codigo:

Protected Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Me.TextBox1.Focus()
If Me.TextBox1.Text = "070332" Then
Me.TextBox2.Text = "Hola"
Else
Me.TextBox2.Text = "adios"
End If
Me.TextBox1.Text = ""
Me.TextBox1.Focus()

End Sub

Ammm la verdad es que no veo donde esta mi error, espero me puedas ayudar