[hsunhdoveh81]

مرحبا
سعيد بوجودي معاكم
لدي استفسار وهو بخصوص الباركود
سوالي ما هو الحدت الذي تنفده الفيجوال عند ادخال قيمة مربع النص باستخدام جهاز قاري الباركود

وشكرا

[sendbad100]

السلام عليكم

لو فرضنا اسم التكست بوك هو  textbox1

ممكن استخدام الاحداث التالية  


1
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

End Sub


2
Private Sub Text1_KeyPress(KeyAscii As Integer)

End Sub


3
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)

End Sub


وافضل الثاني     Text1_KeyPress

[hsunhdoveh81]

اشكركم على اهتمامكم اخوتي

---

هل افهم من خلال كلامك اخي Amir ان القيمة المدخلة في مربع النص الذي عليه التركيز عندما تكون مدخلة من قاري الباركود فان قيمة keyAscii تكون 13 وكان

[hsunhdoveh81]

اسعدني مرورك اخي امير

[hsunhdoveh81]

تمام اخي فهمت عليك عندما تدخل قيمةس من لوحة المفاتيح في مربع النص من الباركو نختبر keyAscii اذا كان قيمته 13 فهذا يعني ان القيمة مدخلة من الباركود ولي

[sendbad100]

السلام عليكم

توضيح اضافي الى ما قدمه الاخ الغالي / امير

قارئ الباركود يقوم بكتابة ارقام ملصق الباركاود ثم يضغط انتر..

حتى نتمكن من معرفة انه انتها من ادخال الارقام.

نحن نسفيد من هذا الامر ضغط انتر ونقوم ...

If KeyAscii = 13 Then هذا السطر يقوم بمعرفة هل المضغوط انتر اذا نعم نفذ الكود.


اتمنى وضحت ولو قليل

والله الموفق

[hsunhdoveh81]

الامر واضح اخي سندباد ... طيب لو ادخل المستخدم ارقام في تيكست وصغط انتر مادا يحصل ؟

[Ahmed_Mansoor]

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

[allobaed]

جزاكم اله خيرا جميعا لتعاونكم بهذا المنتدى الطيب الذي استفدت منه كثيرا