انتقال الموشر بعد ادخال الباركود

اخي الفاضل : ظل السراب

السلام عليكم ورحمة الله وبركاته

تفضل ملفك بعد التعديل بتاء على طلبك

Private Sub bbb_Change()
If Len(Me.bbb.Text) >= 9 Then
Me.ccc.SetFocus
End If
End Sub

za-Database3.rar

بالتوفيق

السلام عليكم ورحمة الله وبركاته

بارك الله فيك اختي الكريمه

فيه ملاحظة وهي قد يكون الباركود مكون من اكثر من 9 ارقام او اقل من ذلك وقد يكون مختلط بين ارقام وحروف

هل يوجد طريقة يتم نقل الموشر الى الحقل التالي بغض لنظر عن عدد الارقام او النوع كــ نص او رقم او مختلط

بالتوفيق إن شاء الله

والسلام عليكم

ظل السراب كتب:

السلام عليكم ورحمة الله وبركاته

بارك الله فيك اختي الكريمه

فيه ملاحظة وهي قد يكون الباركود مكون من اكثر من 9 ارقام او اقل من ذلك وقد يكون مختلط بين ارقام وحروف

هل يوجد طريقة يتم نقل الموشر الى الحقل التالي بغض لنظر عن عدد الارقام او النوع كــ نص او رقم او مختلط

بالتوفيق إن شاء الله

والسلام عليكم

وعليكم السلام ورحمة الله وبركاته

اذا كان الوضع كذلك ولا تريد ان تتقيد بعدد معين من الأرقام بل تترك ذلك حسب نوع الباركود ففي هذه الحالة نستخدم كود آخر بهذه الطريقة

Private Sub bbb_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Me.ccc.SetFocus
End If
End Sub

ماذا يعني هذا الكود ؟

هذا الكود يعني انه عند قراءة رقم الباركود من على طبعة او لاصقة المنتج فإننا سوف نقوم بالضغط على زرار الإدخال الموجود في جهاز الباركود وكأننا نضغط بالضبط على مفتاح انتر والذي يمثل رقم 13 في KeyAscii

ولذا بعد ضغط الزرار في جهاز الباركود لتخزين الباركود في مربع النص bbb سوف ينتقل الموشر مباشرة الى الحقل ccc كما لو اننا ضغطنا بعد ادخال الرقم على مفتاح Enter في لوحة المفاتيح

بالتوفيق

السلام عليكم ورحمة الله وبركاته

بارك الله فيك وحفظك الله

بالتوفيق إن شاء الله

والسلام عليكم