منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ممكن مساعدة في كتابة كود يمنعني من كتابة تاريخ يكون اصغر من اخر تاريخ أدخلته في الدات
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ممكن مساعدة في كتابة كود يمنعني من كتابة تاريخ يكون اصغر من اخر تاريخ أدخلته في الداتا قريد يعني اخر سطر في الداتاقريد متلا يكون 26/07/2018 فعندما اريد ادخاص صف جديد بتاريخ 25/07/2018 يمنعني من دلك
لنقول بالبدابة انك تستخدم اداء 
DateTimePicker

لتحديد التاريخ المدخل
فكل ما عليك فعله هو استخدام الكود بهذا الشكل
كود :
       If DateTimePicker1.Value > DataGridView1.Rows(DataGridView1.RowCount - 1).Cells(1).Value Then
           Dim row As String() = {"1", DateTimePicker1.Value.ToString("yyyy/MM/dd"), "1000"}
           DataGridView1.Rows.Add(row)
       Else
           MsgBox("التاريخ المدخل اقل من المطلوب.")
       End If

وبالنهاية لا تنسي حذف الاسطر التالية
كود :
           Dim row As String() = {"1", DateTimePicker1.Value.ToString("yyyy/MM/dd"), "1000"}
           DataGridView1.Rows.Add(row)

ووضح الكود الخاص بك لادخال البيانات
وتغيير رقم 1 من هذا الجزء
كود :
Cells(1)

الى رقم العمود الخاص بالتاريخ علماً بان ترتيب الاعمدة تبداء العد من 0

تحياتى لك
وتمنياتى لك التوفيق
تمت التجربة بنجاح الكود فعال شكرا
(27-07-18, 10:57 PM)annaba2015 كتب : [ -> ]تمت التجربة بنجاح الكود فعال شكرا


الشكر لله


تحياتى لك
وتمنياتى لك التوفيق