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

سؤال حول عرض أسماء ا لحقول

مغلق
بدأه المهنا في 9 مارس 2005 · 30 رد · 2,175 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#26

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

جيد جدا أنك وضحت نوع الجريد وأحسن أنك تستخدم الـ MSHFlexGrid لأنها لها ريكورد سيت

فبدلا من الكود التالى

Set Me.FLEX1.DataSource = RS
FLEX1.Refresh

استبدله بهذا الكود

Set Me.FLEX1.RecordSet = RS
Flex1.FormatString="^م |^عنوان الكتاب  |^المؤلف |^دار النشر  |^تاريخ النشر

وإن شاء الله بيظبط معاك

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#28

أجعل ( Rows ) في قائمة الخصائص تساوي ( 0 ) .

#30

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

أخى المهنا

لا تيأس

نفسى أكتب لك الكلمة السابقة بخط كبير يملأ الشاشة

راجع كودك ومشكلتك هتحلها بس استعن بالله وحده

والمثال اللى وضعته لك قبل كده كان بيعالج مشكلتك لكن يظهر عندك شيئ آخر يعرقل العملية

أما إن أردت أن تخفيه فعليك اتباع نصيحة الأخ shoqi ولكن بعد أن تجعل خاصية FixedRows =0 وأعتقد أن MSHFlexGrid لن تقبلها ويمكن الـ MsFlexGrid تقبلها

ولكن أكرر لك مشكلتك بسيطة بس راجع الكود بتاعك

ولك فى رسول الله أسوة حسنة

تقول السيدة عائشة : كان صلى الله عليه وسلم إذا حزبه أمر هرع إلى الصلاة

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#31

الاخ العزيز abulyaman

هذا هو الحل بس فيه مشكلة وهي ان التسمية تاتي للحقول حسب الترتيب في قاعد البيانات

فانا اريد ان اخفي الحقول كلها عن طريق عدا الحقول 1 و 2 و 15 و 33 و

MSHFlexGrid1.ColWidth(12) = 0

واريد ان اسمي الحقول 1 و 2 و 15 و 33 و35 فقط وليس كل الحقول وليس بترتيب القاعدة.

بالاسماء الوارده في هذا الكود قمت بحذف الاسم ليصبح |^ أو | فوجدت ان العملية غير ناجعة

Set Me.FLEX1.RecordSet = RS
Flex1.FormatString="^م |^عنوان الكتاب  |^المؤلف |^دار النشر  |^تاريخ النشر

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

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