ارجوا المساعده

m-m-_- كتب:

Private Sub TextBox1_ KeyPress(...)

If e.KeyChar = Chr(13) Then

TextBox2.Focus()

End Sub

الأدوات لها أحداث وكل حدث يتم تنفيذه عند طلبه

هنا في حدث keypress الخاص بالتكست بوكس1 (حدث النقر على أزرار لوحة المفاتيح)

13 = زر انتر

لكل زر من لوحة المفاتيح له رقم خاص مثلاً زر مسافة = 32 وهكذا

لمعرفة أرقام الأزارير يوجد في المرفقات

عند النقر على زر انتر نفذ الأمر (أنقل المؤشر إلى تكست بوكس2) هكذا في الكود

معرفة أرقام لوحة المفاتيح.rar