แสดงข้อมูลใน textbox อัตโนมัติ โดยกดปุ่ม enter ฝากผู้รู้บอกทีครับ(VB 2008)

Public Class Form1

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        If TextBox1.Text.Length = 4 Then
            If TextBox1.Text = "0000" Then
                TextBox2.Text = "mathematics"
            ElseIf TextBox1.Text = "0001" Then
                TextBox2.Text = "Science"
            ElseIf TextBox1.Text = "0002" Then
                TextBox2.Text = "Biologies"
            End If
        End If
    End Sub
End Class

if (e.KeyCode == Keys.Enter)
  {

  }///////อันนี้มันของ C# น่าจะประยุกษ์ได้นะ