الشقاوي قام بنشر ديسمبر 11, 2015 قام بنشر ديسمبر 11, 2015 السلام عليكم ورحمة الله وبركاته لدي مربع نص قناع الادخال له هو اربعة ارقام سؤالي كيف يتم تنفيذ كود بعد كتابة الاربعة ارقام / اي بعد كتابة الرقم الاخير يتم تنفيذ الكود والشكـــــــــــــر للجميع
نور الدين وليد قام بنشر ديسمبر 11, 2015 قام بنشر ديسمبر 11, 2015 اكتب الكود التالى فى الحدث AfterUpdate If Len([Text0]) = 4 Then هنا ضع الكود المطلوب End If الدالة len تستخدم لمعرفة عدد الحروف بالتكست 1
الشقاوي قام بنشر ديسمبر 11, 2015 الكاتب قام بنشر ديسمبر 11, 2015 شكرا لك اخي نور اقصد انه عند بعد كتابة الرقم الاخير يتم تنفيذ الكود تلقائياً بدون الضغط على اي زر وشكراً لك
رمهان قام بنشر ديسمبر 11, 2015 قام بنشر ديسمبر 11, 2015 سؤال جميل ! تفضل ومشاركة مع اخي نور Private Sub text1_Change() If Right(text1.Text, 1) <> "_" Then MsgBox ("hi") End Sub 2
الشقاوي قام بنشر ديسمبر 11, 2015 الكاتب قام بنشر ديسمبر 11, 2015 شكراً لك اخي رمهان هو المطلوب فعلاً شكراً جزيلاً .. لا حرمنا الله من علمك والشكر لاخي نور
رمهان قام بنشر ديسمبر 11, 2015 قام بنشر ديسمبر 11, 2015 (معدل) 9 دقائق مضت, الشقاوي said: شكراً لك اخي رمهان هو المطلوب فعلاً شكراً جزيلاً .. لا حرمنا الله من علمك والشكر لاخي نور حياكم الله دائما وابدا ! وحبيت انبه وللعلم ان الكود ليس مقيد بعدد خانات قناع الادخال ! بالتوفيق تم تعديل ديسمبر 11, 2015 بواسطه رمهان
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.