الاخوة الاعزاء
لدي طلب كود يحدد لي اصغر رقم اكبر في عمود من MSFlexGrid
هل يمكن عمل ذلك
تحياتي
الاخوة الاعزاء
لدي طلب كود يحدد لي اصغر رقم اكبر في عمود من MSFlexGrid
هل يمكن عمل ذلك
تحياتي
أخي الفاضل
أظن أنه يمكنك عمل ذلك
و سيدلك أعضاء المنتدى كيفية عمل ذلك
و لكنني أقترح عليك أن تقوم بعمل استعلام على الجدول الذي يمثل (Msflexgrid) من خلال لغة SQL فهذا أسهل بكثير
وفقك الله في برنامجك و شكرا لك...
مؤسس شبكة مواقع إجابتي أول شبكة مواقع عربية للأسئلة والأجوبة
السلام عليكم ورحمة الله وبركاته
يمكنك فعل ذلك بإستخدام الخاصية Sort
وهي تقوم بترتيب بيانات حقل معين .
فاذا قمت بالترتيب تصاعديا .
ستجد ان أصغر قيمه تمركزت في البدايه وفي النهايه اكبر قيمه .
راجع : ترتيب البيانات المعروضه في الداتا جريد
بالتوفيق .............
A7med_prof
تم تعديل هذه المشاركة بواسطة A7med_prof في 4 مايو 2007 في 14:14
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
الأخ الفاضل ...
ارجوا ان يفيدك هذا المثال فى ما تريد إنجازه، بأستخدام (MS-VB 6.0)
يعتمد المثال على الدالة GetMinMaxValues
Private Function GetMinMaxValues(ByRef fg As MSFlexGrid, ByVal startRow As Integer, ByVal endRow As Integer, ByVal iCol As Integer, ByRef minRow As Double, ByRef maxRow As Double) As Boolean Dim r As Integer Dim bFirst As Boolean Dim num As Double Dim numMin As Double Dim numMax As Double Dim Str As String minRow = -1 maxRow = -1 bFirst = True For r = startRow To endRow Str = Trim(fg.TextMatrix(r, iCol)) If Len(Str) > 0 Then num = Val(Str) If bFirst = True Then minRow = r maxRow = r numMin = num numMax = num bFirst = False End If ' Get Min If numMin > num Then minRow = r numMin = num End If ' Get Max If numMax < num Then maxRow = r numMax = num End If End If Next GetMinMaxValues = Not bFirst End Function
ويمكنك استدعائها بالشكل التالى
Call GetMinMaxValues(fgData, startRow, endRow, iCol, minRow, maxRow)
حيث:
شكراً
Nothing is impossible, the word impossible itself says that: I M - Possible
تمام بارك الله فيك ............
شكرا
ولي طلب اخر وهو
اريد تحديد عدد الصفوف في العمود الواحد
مثلا في العمود الاول اريد اصغر واكبرقيمة من الصف 1 الي الصف 5 ثم من الصف 6 الي 10 وهكذا
الرجاء المساعدة
وتحياتي للجميع
السلام عليكم ورحمة الله وبركاته
اقتباساريد تحديد عدد الصفوف في العمود الواحد
يمكن تحديد عدد صفوفها عن طريق الخاصية Rows
MSFlexGrid1.Rows
اقتباسمثلا في العمود الاول اريد اصغر واكبرقيمة من الصف 1 الي الصف 5 ثم من الصف 6 الي 10 وهكذا
بالطبيع بعد عملية الترتيب مثلا تصاعديا وتريد معرفة اكبر واصغر قسمة ما بين الـ سجل 1 والسجل 5 فا طبيعي اصغر قيمه هي عند السجل رقم 1 واكبر قسمه عند السجل رقم 5 وهكذ ............
بلتوفيق ,,,,,
A7med_prof
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
الأخ الفاضل ...
للحصول على اكبر واصغر قيمة بين الصف رقم (6) ورقم (10) ولنفترض فى العمود رقم (3) أستخدم
GetMinMaxValues(fgData, 6, 10, 3, minRow, maxRow)
حيث minRow ستحتوى على رقم الصف الذى يحتوى أقل قيمة و maxRow ستحتوى على رقم الصف الذى يحتوى أكبر قيمة...
هل هذا ما تقصده أم تقصد الحصول على القيمة رقم (1) ورقم (5) ورقم (6) ورقم (10) من حيث الترتيب، فالنتيجة مختلفة... بمعنى:
نفترض لديك عمود (تاريخ الالتحاق بالعمل) وعمود (تاريخ الميلاد) وعمود (الراتب)، والبيانات مرتبه بناءاً على التحاق العمل
فهل تريد ترتيب كل عمود على حدى؟ ام بناء على عمود معين؟؟؟
لن تستطيع بالترتيب الحصول على اكبر واصغر قيمة فى كل الاعمده
ولكن بالداله السابق ذكرها
شكراً
Nothing is impossible, the word impossible itself says that: I M - Possible
هذا الموضوع مغلق.