منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كود للانتقال الى التكست بوكس التالي عند الضغط على زر انتر
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
اولا يجب الانتباه الى ترتيب العناصر الخاصة بالمشروع من خلال tabIndex بحيث عند الضغط على زر تاب او انتر سينتقل الى العنصر الذي يكون رقمة هو التالي

ثم في keydown الخاص بالتكست بوكس نقوم باضافة الكود التالي     

كود :
 If e.KeyCode = Keys.Enter Then
            e.SuppressKeyPress = True
            SendKeys.Send("{Tab}")
        End If
جزاك الله خير اخي الكريم ،، الله يحقق الأماني للجميع
شكرا جزيلا الكود يعمل بشكل رائع
شكرا جزيلا 
اذا وضعت هذا الكود في حدث keydown  للفورم افضل 
لتقليل الاكواد وتوفير الوقت
يمكنك استخدام هذا الكود  

كود :
If e.KeyCode = Keys.Enter Then
   Me.SelectNextControl(Me.ActiveControl, True, True, True, False) 'for Select Next Control
End If