اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

عمل شريط نص متحرك


مفتون

الردود الموصى بها

1 - ضع مربع نص على النموذج وليكن اسمه txtmove

2 - ثم تضع عند حدثالتحميل On Load للنموذج الكود التالي:

txtmove = Space(100) & "تضع هنا الخبر او اللإعلان الذي تريد عرضه"
3 - ثم تضع عند حدث الفاصل الزمني On Timer للنموذج الذي تريد العرض عليه الكود التالي:
txtmove = Mid(txtmove, 2) & Left(txtmove, 1)

رابط هذا التعليق
شارك

اخي امير بهذه الطريقه الكلام يكون في مربع نص

تمام لكن المشكله

اريد ان اضع مربع نص في نموذج ثاني واسمي النموذج الاخبار

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

رابط هذا التعليق
شارك

1 - ضع مربع نص على النموذج وليكن اسمه txtmove

2 - ثم تضع عند حدثالتحميل On Load للنموذج الكود التالي:

txtmove = Space(100) & Dlast("strNews","tblNews")
حيث tblNews هو اسم الجدول الذي يتم تسجيل االأخبار به و strNews هو اسم حقل الأخبار داخل الجدول الذي يتم التسجيل كل خبر بداخله بحيث يظهر آخر خبر دائماً بالشريط الإعلاني 3 - ثم تضع عند حدث الفاصل الزمني On Timer للنموذج الذي تريد العرض عليه الكود التالي:
txtmove = Mid(txtmove, 2) & Left(txtmove, 1)

رابط هذا التعليق
شارك

السلام عليكم

هلا والله بحبيبنا الأخ أمير كيف حالك ومن زمان مطول علينا غيابك ولكن واضح ابداعك

على العموم أخي أمير لو حبيت شريط الإعلان يعرض جميع سجلات الحقل strNews بالتناوب بحسب ترتيب إدخالها فكيف يتم ذلك بمعنى لاأريد عرض آخر إعلان فقط تم ادخاله

تحياتي لك

رابط هذا التعليق
شارك

على العموم أخي أمير لو حبيت شريط الإعلان يعرض جميع سجلات الحقل strNews بالتناوب بحسب ترتيب إدخالها فكيف يتم ذلك بمعنى لاأريد عرض آخر إعلان فقط تم ادخاله

تحياتي لك

هل من الممكن ذلك ؟

مع وافر الشكر والعرفان

رابط هذا التعليق
شارك

  • 2 weeks later...

ملاحظه على شريط الاعلان المتحرك

بعد ان عملت الكودين ظهر الشريط الاعلاني المتحرك على النموذج الاساسي

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

واذا الغيت الشريط الاعلاني من النموذج الاساسي يعمل النموذج الاخر بشكل سليم

ارجو المساعده :@

رابط هذا التعليق
شارك

السلام عليكم

نعم قمت بضبط التايمر =100

ولم يتغير شي

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

ها هناك علاج لهذه المشكله بدل من تغيير النموذج وذلك لاني احتاج القائمه المنسدله لانها تسهل اختيار السجل ثم عرض بياناته مباشره دون الحاجه الى كتابة رقم السجل خصوصا وان لدي اكثر من 1250 سجل

اذا رديت جزاك الله خير

واذا مارديت برضه جزاك الله خير

رابط هذا التعليق
شارك

  • 14 years later...
في ١٨‏/٣‏/٢٠٠٤ at 01:15, امير عاطف said:

1 - ضع مربع نص على النموذج وليكن اسمه txtmove

 

2 - ثم تضع عند حدثالتحميل On Load للنموذج الكود التالي:

 

 

txtmove = Space(100) & Dlast("strNews","tblNews")

حيث tblNews هو اسم الجدول الذي يتم تسجيل االأخبار به و strNews هو اسم حقل الأخبار داخل الجدول الذي يتم التسجيل كل خبر بداخله بحيث يظهر آخر خبر دائماً بالشريط الإعلاني 3 - ثم تضع عند حدث الفاصل الزمني On Timer للنموذج الذي تريد العرض عليه الكود التالي:

 

txtmove = Mid(txtmove, 2) & Left(txtmove, 1)

 

جزاك الله خير

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

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information