JAMAL SINANI قام بنشر أغسطس 27, 2019 قام بنشر أغسطس 27, 2019 السلام عليكم ورحمة اله وبركاته مرحبا استاذتي الكرام لدي برنامج من خلاله يقرأ الباركود وذلك حسب الارقام المدخلة سابقا لكل الاصناف اريد ان اضع كود يعطي رسالة تنويه في حال ادخال كود غير موجود من ضمن الاكواد المدخلة في البرنامج ويرفض العملية مع شكري وتقديري لهذا الصرح المميز الصورة تشرح الامر واحاول ان شاء ان ارفع برنامج مبسط لهذا الموضوع 1
حسين العربى قام بنشر أغسطس 27, 2019 قام بنشر أغسطس 27, 2019 تفضل اخي الفاضل On Error Resume Next ''''''''''''''''''''''' Me.txt1 = DLookup("[BARCODEحقل]", "TABOL1 جدول", "[BARCODEحقل]='" & Me.SERH حقل البحث & "'") '''''''''''''''''' If Len(Me.TXT1 & "") = 0 Then MsgBox "هذا الباركود غير مسجل" Undo Exit Sub End If انشأ مربع نص غير منضم وسميه TXT1 ضع هذا الكود حذث بعد التحديث في مربع النص الذي تسميه الصندوك الذي تبحث فيه وهتسميه SERH 1
JAMAL SINANI قام بنشر أغسطس 27, 2019 الكاتب قام بنشر أغسطس 27, 2019 الف شكر لك استاذ حسين العربى وربي يوفقك في الدنيا والاخرة
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان