[VB.NET] [تم الحل] مشكلة اضافة عناصر الي ListView - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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] [تم الحل] مشكلة اضافة عناصر الي ListView (/showthread.php?tid=35104) |
[تم الحل] مشكلة اضافة عناصر الي ListView - الماجيك مسعد - 03-06-20 السلام عليكم عندي كود : Public Class JSON_result واقوم بجلب البيانات عبر Dim mgdata = JsonConvert.DeserializeObject(Of JSON_result)(data) واحاول اضافة العناصر لليست فيور عبر ListView1.Items.Add(New ListViewItem({mgdata.Pk.ToString(), mgdata.Username, mgdata.FullName.ToString()})) ولكن يظهر خطأ بسبب ان mgdata.FullName = nothing كيف يمكن تخطي هذه المشكلة RE: مشكلة اضافة عناصر الي ListView - aljzazy - 03-06-20 Public Property full_name() As String ListView1.Items.Add(New ListViewItem({mgdata.Pk.ToString(), mgdata.Username, mgdata.full_name.ToString()})) RE: مشكلة اضافة عناصر الي ListView - الماجيك مسعد - 04-06-20 (03-06-20, 11:15 PM)aljzazy كتب : Public Property full_name() As String للاسف نفس الخطأ {"Object reference not set to an instance of an object."} لما بحذف , mgdata.FullName.ToString() بيشتغل بدون مشكلة المشكلة ان بعض المتغيرات لما يكون ليس لها قيمة تعود ب nothing لذا يحدث الخطأ لذا ابحث عن حل RE: مشكلة اضافة عناصر الي ListView - الماجيك مسعد - 04-06-20 شكرا لكم جميعا تم ايجاد الحل في موقع اخر وهو وعليكم السلام المشكله هي انك تقوم بتحويل المتغير الي String عن طريق toString وفي الكود قلت ان الـ متغير ممكن ان يكون Nothing or Null فما يحدث انك تحاول تحويل Nothing لاشئ الي string فيحدث خطا السؤال هو لماذا تحاول تحويل الـ FullName الذي نوعه String الي String لا داعي للتحويل لذا يمكنك تغير الكود الي لا داعي لاستخدام ToString مع FullName كما هو الحال لديك مع Username كود: ListView1.Items.Add(New ListViewItem({mgdata.Pk.ToString(), mgdata.Username, mgdata.FullName})) و يمكنك ايضا ان تقوم بعمل شرط اذا اردت وضع قيمه افتراضيه مثلا كود: If mgdata.FullName Is Nothing Then mgdata.FullName="No Name" 'تضع قيمه افتراضيه تظهر للمستخدم End If |