TextBox’a Bilgi Girişinin Bittiğini Enter ile Belirtmek

Private Sub Text_KeyPress (KeyAscii As Integer)
If KeyAscii = 13 Then ‘ KeyAscii = 13 - Enter
AD= Text1.Text
End If
End Sub