SendKeys

If KeyAscii = 13 Then
System.Windows.Forms.SendKeys.Send("{TAB}")
End If