مربع نص يومض

[ابوالوفاء]

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

[التقني]

السلام عليكم

حياك الله أخي أبو الوفا

حبذا لو تدل الأخوة على الرابط الذي وجدت فيه طريقة جعل النص يومض

حتى يمكنهم افادتك

[ابوالوفاء]

اخي المشرف الكريم :هذا الكلام وجدته في منتديات الفريق العربي للبرمجه لعضو يسمى راكان العوده:

لجعل عنوان او مربع نص يومض (يؤشر)

ضع في حدث عند عداد الوقت الكود التالي

CODEMe!last.Visible = Not (last.Visible)

حيث ان last هو اسم النص او مربع النص

وعند الفاصل الزمني ضع القيمة التي تريد ولتكن 500

وشكرا لكم

وعذراً لا يوجد لدي الرابط ارجو المعذرة

[ابوالوفاء]

الاخة الكرام المشرفين والاعضاء بهذا الموقع الجميل المحبوب لدي في المشاركة عند طلب الطريقه قلت ان الكلام موجود في هذا الموقع ولم اتذكر الا لما طلب المشرف التقني الرابط ارجو المعذره لهذا التخبط والعتب كل العتب على كثرة الهواجس ارجو المعذرة من الجميع اخوكم ابو الوفاء

[التقني]

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

حياك الله أخي أبو الوفا

اليك طريقة تجعل ما بداخل مربع النص يومض ...

1- أنشئ مربع نص بإسم Bix

2- ضع الكود التالي في حدث (عند التحميل ) للنموذج :

Me.TimerInterval = 300

3- ضع الكود التالي في حدث (عند عداد الوقت) للنموذج :

With Me.bix
.ForeColor = (IIf(.ForeColor = vbRed, vbBlack, vbRed))

End With

5- قم بتحميل النموذج وضع أي كلمة داخل مربع النص وسترى النتيجة

ملاحظات :

1- الكود في الخطوة 2 يجعل الفترة الزمنية قيمتها 300

2- الكود في الخطوة 3 يتم التبديل بين الألوان الاحمر والاسود والاحمر

3- يمكنك التعديل في الخطوات 2 و 3 بما يناسبك

4- هل تريد مثال على ذلك ؟

بالتوفيق

[ابوالوفاء]

جعلك الله يا التقني من اهل جنته ارغب في المراد بتحميل النموذج وان تمكنت من ارفاق المثال الذي يوضح لي الطريقة مع الاعتذار اليك من كثرة الاسئلة

وفقك الله لكل خير

[التقني]

اللهم آمين

ولك بالمثل أخي العزيز

اليك المثال

FlashingBox.rar

[ابوالوفاء]

اخي التقني

اشكرك على التجاوب والصبر علي

اسأل الله لك المغفرة والرضوان منه عليك

رزقك الله طاعته

شكراً لك000