Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.?
TextBox2.Visible = False
Button2.Visible = False
modellname = TextBox2.Text
如上段代码，我怎么通过在textbox中输入完东西，直接按回车键，然后自动执行上段代码，是不是在？处设置，应该怎样设置

Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
Dim ae As String
ae = e.KeyCode
If ae = e.KeyCode.Enter Then
Call TextBox2_TextChanged(sender, e)
End If
End Sub
你上面的代码最好换个事件......

谢谢，我试试

还是不行啊
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
Dim ae As String
ae = e.KeyCode
If ae = e.KeyCode.Enter Then
Call TextBox2_modell(sender, e)
End If
End Sub
Private Sub TextBox2_modell(ByVal sender As System.Object, ByVal e As System.EventArgs)
TextBox2.Visible = False
Button2.Visible = False
我是这样搞得，但按了回车还是没用

问题解决了，不好意思上面的textbox1换成textbox2就行了，谢谢了