تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
معرفة أكبر قيمة للتاريخ الموجودة في الداتاقريدفيو
#1
السلام عليكم ورحمة الله وبركاته 

 إخواني سؤالي عن كيفية معرفة أكبر قيمة للتاريخ موجودة في عمود مخصص للتاريخ موجود في الداتاقريد فيو  حيث توجد سجلات عديدة ولكني أريد معرفة أكبر تاريخ 



دمتم بود 
الرد }}}
تم الشكر بواسطة:
#2
وانا كمان اريد الجواب وشكرا
الرد }}}
تم الشكر بواسطة:
#3
Dim md As Date = (From row In DataGridView1.Rows.Cast(Of DataGridViewRow)() Select CDate(row.Cells(7).Value)).Max

لم اجربه
الرد }}}
تم الشكر بواسطة: ابو انس , ابراهيم ايبو
#4
كود :
  For i As Integer = 0 To dgv.Rows.Count - 1
           Dim aa As Date = TextBox1.Text
           Dim bb As Date = dgv.Rows(i).Cells(0).Value
           If bb > aa Then TextBox1.Text = bb
       Next

طبعا dgv داتا جريد فيو

(18-05-21, 04:55 PM)2021 كتب : Dim md As Date = (From row In DataGridView1.Rows.Cast(Of DataGridViewRow)() Select CDate(row.Cells(7).Value)).Max

لم اجربه
قمت بتجربة الكود
ماشا الله الكود اكثر من رائع
شكرا لك
سورس كود برنامج محاسبة ومبيعات احترافي  -  سورس كود تطبيق ارسال رصيد من الجوال B4A
سورس كود تطبيق مبيعات للجوال
تيليجرام   Abo_anas_kahwaji@
واتساب 00963951283515
الرد }}}
تم الشكر بواسطة: 2021 , ابراهيم ايبو
#5
تسلم يالغالي

هذا الكود من هذا المنتدى
الكود الاصلي كان نوع بيانات CDbl مع دالة Sum
انا غيرت نوع البيانات الى CDate مع الدالة Max
الرد }}}
تم الشكر بواسطة: ابو انس , ابراهيم ايبو
#6
السلام عليكم ورحمة الله وبركاته
اخي الكريم
بالنسبة لجلب قيمة اكبر تاريخ لحقل معين
هناك افكار عدة فمثلا يمكنك جلب كل السجلات مسلسلة من التاريخ الاكبر الى الاصغر ثم اختر من السجلات السجل الاول والحقل الذي يحمل التاريخ
وكذلك اختيار السجل الاول لكل الحقول order by  حقل التاريخ تنازليا
كود :
da = New SqlDataAdapter("Select TOP 1 * From Items order by itm_date Desc ", Cn)
او استعلم ب Max عن اكبر قيمة لحقل التاريخ باسم معين
كود :
da = New SqlDataAdapter("Select  Max(itm_date) as MyDate  From Items  ", Cn)
الكود كامل
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           Dim da As New SqlDataAdapter
           Dim dt As New DataTable
           dt.Rows.Clear()
           ' جلب السجل بالكامل
           'da = New SqlDataAdapter("Select TOP 1 * From Items order by itm_date Desc ", Cn)

           '' جلب عمود التاريخ  فقط
           da = New SqlDataAdapter("Select  Max(itm_date) as MyDate  From Items  ", Cn)

           da.Fill(dt)
           Dgv.DataSource = dt
       Catch ex As Exception
           MessageBox.Show(ex.Message, "Alert", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
       End Try
   End Sub
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد }}}
تم الشكر بواسطة: 2021 , essawq
#7
جزاكم الله خيرا أحبابي عاجز عن تقديم الشكر لكم 
لا غنى عن هذا المنتدى الرائع 
الكود يعمل مئة بالمئة 
دمتم بود 
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  معرفة رصيدي للهاتف النقال المتصل بالكمبيوتر وارسال رسائل نصية منه AHMED213 0 98 22-02-24, 11:47 AM
آخر رد: AHMED213
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 1 309 21-02-24, 11:44 PM
آخر رد: AHMED213
  معرفة عدد مرات تكرار الاسم في الداتاقريدفيو صالح عبدالله 8 426 05-02-24, 04:39 PM
آخر رد: صالح عبدالله
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 7 676 12-01-24, 07:31 PM
آخر رد: Kamil
  معرفة عدد الاشهر خلال فترة زمنيةمعينة boofa2022 0 170 01-01-24, 01:18 PM
آخر رد: boofa2022
  [سؤال] كيف نستعيد قيمة من دالة ضمن مسار مستقل justforit 2 393 21-11-23, 10:51 AM
آخر رد: justforit
  كيف اجعل قيمة dateTimePicker2 تساوي dateTimePicker1 Adel27213 2 280 09-11-23, 09:07 PM
آخر رد: Adel27213
  كيفية جمع قيمة على تاريخ معين واستنتاج تاريخ أخر Ahmed.vb 1 317 02-11-23, 03:52 AM
آخر رد: Taha Okla
  ارجاع قيمة Function سعد منصور 1 268 01-11-23, 02:10 AM
آخر رد: Taha Okla
  كود تغيير قيمة تكست بوكس فى تاريخ معين Ahmed.vb 2 906 11-10-23, 10:35 PM
آخر رد: aljzazy

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم