السلام عليكم ورحمة الله وبركاته
واجهتني مشكلة في عرض البيانات من اداة الداتا جريد الى الادوات
وبالتحديد في حالة إذا كان الحقل من نوع تاريخ لا يقبل إذا كان التاريخ فارغ
في الاجراء DataGridView1_Cellclick
كود :
txtUName.Text= DataGridView1(0,e.RowIndex).Value
txtIdNum.Text=DataGridView1(1,e.RowIndex).Value
dim MyDate as Date = DataGridView1(2,e.RowIndex).Value
txtMyDate.text= MyDate.ToString("yyyy/MM/dd")
انا ا ستخدم هذا الكود
في مربع النص الخاص بالتاريخ تظهر المشكلة
وعليكم السلام ورحمة الله وبركاته
ممكن توضح سؤالك لو سمحت
انا ارى في الكود ثلاث تيكست بوكس
ماالذي تريده بالضبط
الف شكر على ردك
لدي وليكن اكثر من تيكست بوكس
من ضمنهم اداة تاريخ
وفي قاعدة البيانات تم حفظ البيانات الا ان التاريخ فارغ لم يتم حفظة
في حالة التاريخ فارغ تظهر مشكلة في عرض البيانات من الجريد الى الاداة الخاصة بالتاريخ
(27-08-21, 09:21 PM)aftfm كتب : [ -> ]الف شكر على ردك
لدي وليكن اكثر من تيكست بوكس
من ضمنهم اداة تاريخ
وفي قاعدة البيانات تم حفظ البيانات الا ان التاريخ فارغ لم يتم حفظة
في حالة التاريخ فارغ تظهر مشكلة في عرض البيانات من الجريد الى الاداة الخاصة بالتاريخ
اداة التاريخ شيء والتيكست بوكس شيء اخر
على كل حال
كود :
txtUName.Text = dgv(0, dgv.CurrentRow.Index).Value
هذا الكود يجلب القيمة من الداتا جريد فيو الى التيكست بوكس سواء كانت رقم او تاريخ او نص او لا شيء (فراغ) بدون خطأ
جزيت خيراً
ابو انس
تم تجربة الكود
txtUName.Text = dgv(0, dgv.CurrentRow.Index).Value
ولا تزال يظهر الخطأ في ما اذا كان حقل التاريخ فارغ
في المرفقات مثال بسيط يمثل الكود الذي اتحدث عنه ولا يوجد اي خطأ
وعليكم السلام ورحمة الله وبركاته
تستطيع تجاوز تنفيذ الكود الخاص بالتاريخ من خلال التحقق منه إذا كان فارغ يتجاوز تنفيذه أما إذا كان غير فارغ ينفذ الكود وذلك من خلال استخدام جملة IF
كود :
txtUName.Text= DataGridView1(0,e.RowIndex).Value
txtIdNum.Text=DataGridView1(1,e.RowIndex).Value
if DataGridView1(2,e.RowIndex).Value is DBnull.value then
Else
dim MyDate as Date = DataGridView1(2,e.RowIndex).Value
txtMyDate.text= MyDate.ToString("yyyy/MM/dd")
end if
بارك الله فيكم والف شكر على اهتمامكم