منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كيف احلها - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كيف احلها (/showthread.php?tid=36669)



كيف احلها - abarrak - 11-10-20

بسم الله الرحمن الرحيم



عند رسالة الخطأ كيف أحلها 


كود :
System.NullReferenceException: 'Object reference not set to an instance of an object.'





الصوره للتوضيح :-


RE: كيف احلها - aliraqi - 11-10-20

(11-10-20, 10:36 AM)abarrak كتب :
بسم الله الرحمن الرحيم



عند رسالة الخطأ كيف أحلها 


كود :
System.NullReferenceException: 'Object reference not set to an instance of an object.'





الصوره للتوضيح :-
اعمل برايفت صب واستدعيه في الفورم لود كما في الصورة المرفقة


RE: كيف احلها - عبد العزيز البسكري - 11-10-20

هل أسماء أعمدة الداتاجريد قمت بإضافتها يدويا على الداتاجريد في وضع التصميم ؟
أما إذا كنت تستدعيها من خلال الكود
يجب أوّلا إضافة أعمدة الداتاجريد
بعدها
نقوم بتنسيقها ..   
و يستحسن .. على أساس الداتاجريد نفسه .. يسمى DGV
كود :
Private Sub DGVSittings()
If DGV.RowCount > 0 Then
With Me.DGV
DGV.Columns(0).Width = 100
DGV.Columns(1).Width = 150
DGV.Columns(0).HeaderText = "رقم الكتاب"
DGV.Columns(1).HeaderText = "اسم الكتاب"
End With
End If
End Sub

تحياتي



RE: كيف احلها - abarrak - 11-10-20

(11-10-20, 12:12 PM)aliraqi كتب :
(11-10-20, 10:36 AM)abarrak كتب :
بسم الله الرحمن الرحيم



عند رسالة الخطأ كيف أحلها 


كود :
System.NullReferenceException: 'Object reference not set to an instance of an object.'





الصوره للتوضيح :-
اعمل برايفت صب واستدعيه في الفورم لود كما في الصورة المرفقة




نفس المشكلة  تم إرفاق السورس للتوضيح أكثر

(11-10-20, 12:34 PM)عبد العزيز البسكري كتب :
هل أسماء أعمدة الداتاجريد قمت بإضافتها يدويا على الداتاجريد في وضع التصميم ؟
أما إذا كنت تستدعيها من خلال الكود
يجب أوّلا إضافة أعمدة الداتاجريد
بعدها
نقوم بتنسيقها ..   
و يستحسن .. على أساس الداتاجريد نفسه .. يسمى DGV
كود :
Private Sub DGVSittings()
If DGV.RowCount > 0 Then
With Me.DGV
DGV.Columns(0).Width = 100
DGV.Columns(1).Width = 150
DGV.Columns(0).HeaderText = "رقم الكتاب"
DGV.Columns(1).HeaderText = "اسم الكتاب"
End With
End If
End Sub

تحياتي



نفس المشكلة تم إرفاق السورس للتوضيح أكثر و شكر لك


RE: كيف احلها - Jounior_P - 11-10-20

جرب المرفق


RE: كيف احلها - abarrak - 12-10-20

(11-10-20, 01:37 PM)Jounior_P كتب : جرب المرفق



نفس المشكلة


RE: كيف احلها - boudyonline - 12-10-20

اخي الفاضل :
بمراجعة Form1 ... توجد بعض الاخطاء :


اولا : جملة الاتصال خاطئة ... فاسم الملف واصداره يختلف عن ملف قاعدة البيانات
ثانيا : اين هو الجدول Library ؟؟؟

صحح الاخطاء المشار إليها وحاول مرة اخرى