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

نسخة كاملة : مشكلة في نقل قيمة الخلية الفارغة من data grid view الى ملف الاكسل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورمة الله وبركاته
في حال قيمة الخلية Null نصدر رسالة تمنع ذلك ..
 .WriteLine("  <Data ss:Type=""String"">{0}</Data>", DGV.Item(intCol, intRow).Value.ToString)
ممكن المساعدة

(21-12-22, 01:29 PM)Mohammed Nafa كتب : [ -> ]السلام عليكم ورمة الله وبركاته
في حال قيمة الخلية Null نصدر رسالة تمنع ذلك ..
 .WriteLine("  <Data ss:Type=""String"">{0}</Data>", DGV.Item(intCol, intRow).Value.ToString)
ممكن المساعدة
السلام عليكم ورمة الله وبركاته
الحمد لله فتح الله علي بالحل التالي...
أرجو ان تعم المنفعة ان شاء الله...

If DGV.Item(intCol, intRow).Value IsNot Nothing Then
                        .WriteLine("  <Data ss:Type=""String"">{0}</Data>", DGV.Item(intCol, intRow).Value.ToString)
                    Else
                        .WriteLine("  <Data ss:Type=""String"">{0}</Data>", "")
                    End If
(21-12-22, 01:29 PM)Mohammed Nafa كتب : [ -> ]السلام عليكم ورمة الله وبركاته
في حال قيمة الخلية Null نصدر رسالة تمنع ذلك ..
 .WriteLine("  <Data ss:Type=""String"">{0}</Data>", DGV.Item(intCol, intRow).Value.ToString)
ممكن المساعدة

(21-12-22, 01:29 PM)Mohammed Nafa كتب : [ -> ]السلام عليكم ورمة الله وبركاته
في حال قيمة الخلية Null نصدر رسالة تمنع ذلك ..
 .WriteLine("  <Data ss:Type=""String"">{0}</Data>", DGV.Item(intCol, intRow).Value.ToString)
ممكن المساعدة
السلام عليكم ورمة الله وبركاته
الحمد لله فتح الله علي بالحل التالي...
أرجو ان تعم المنفعة ان شاء الله...

If DGV.Item(intCol, intRow).Value IsNot Nothing Then
                        .WriteLine("  <Data ss:Type=""String"">{0}</Data>", DGV.Item(intCol, intRow).Value.ToString)
                    Else
                        .WriteLine("  <Data ss:Type=""String"">{0}</Data>", "")
                    End If

او استخدام الكود للتحقق من قيمة الخلية قبلا
كود :
If not.......... IsDbNull
..
End if