الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أستنفذت جميع المحاولات لعمل زر استعراض ولم أفلح هل من حل

مغلق
بدأه k.f.u في 24 ديسمبر 2006 · 2 رد · 472 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

أني لما أعمل تشغيل أعمل استعراض ألاحظ انه يحذف لي السجل الاول في كل مره !!!!!!!!!!!!!!

بعدها حذفت الزر

وسألت شخص فأعطاني طريقة من الطرق وهي كالتالي :

بالـ frame الخاص بازرار (التالي والسابق )نضبط خاصية Enabled على false

بــــالـ frame الخاص( بالتكست )أضبط الخاصيه Enabled على true

وأضع زر أستعراض وأضع التالي

Frame1.Enabled= trueباللاضافة الى

Text1.text = Data1 الخ

الخ

وفي الفورم أكتفيت

Text1.text= ""

المهم أن الطريقه برضوا ماضبطت وبدات تمسح بعض الحقول

ماعرف وين المشكله ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

أرجوا منكم مساعدتي في إيجاد حل

وجزاكم الله خيرا ..............

تم تعديل هذه المشاركة بواسطة k.f.u في 24 ديسمبر 2006 في 22:06

سبحان الله وبحمده سبحان الله العظيم ..أستغفر الله

samp8a5b2fc47732a301.jpg

#3

ممكن يكون طلبك هذا

في كوماند التالي حط الكود

data1.recordset.movenext
if data1.recordset.eof then
beep
data1.recordset.movelast
end if

وفي كوماند السابق حط الكود

data1.recordset.moveprevious
if data1.recordset.Bof then
beep
data1.recordset.movefirst
end if

أرجوا ان اكون وفقت في الاجابة

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…