حركت بين كنترلها با استفاده از كليد Enter؟؟؟؟

[yareza]

با سلام خدمت شما دوستان گرامی
-------------------------------------------------------------------------------
از خودم خندم می گیره آخه بگو اینم سواله می پرسی
آخه من دیگه خیلی وقته رفتم تو کاره دات نت
دیروز یه پروژه یکی از دوستان آورده بود گفت که اینو انجام بده با vb برا دانشگاه میخواستش استادشون گفته بود یه با کد خیلی کمی میتونید این مشکلو بر طرف کنید من هر چی فکر کردم فقط set focus یادم اومد ولی طول کدش زیاد میشه....(اینو میگن ضعف عقلی) برنامه یه بانک اطلاعاتی است که در هر فرم باید با زدن کلید enter از یک کنترل به کنترل دیگه بره و نخواد که از setfocus استفاده کنی.
یه چیزی هم تو گوگل پیدا کردم اما جواب نمیده
...............................................................................
حركت بين كنترلها با استفاده از كليد Enter

با استفاده از این کد می توانید با زدن کلید Enter بين كنترلهاي روي فرم (تكس باكس و دكمه فرمان ) حركت كنيد .(براي سهولت در حركت بجاي tab يا جهت نما استفاده مي شود.)

۱- خاصيت Key Press فرم را True كنيد.

2- tab index تمام كنترلها را ست كنيد.

3- كد زير را در رويداد Key Press فرم كپي كنيد. و استفاده كنيد.

(Private Sub Form_KeyPress(KeyAscii As Integer
If KeyAscii = vbKeyReturn Then SendKeys "{TAB}": KeyAscii = 0
End Sub

الکیه جواب نیمیده
---------------------------------------------------------------
خواهشمندم اگه میشه اینو جواب بدید ممنون میشوم