+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=34796)
ازاي اضيف ملف نصي الي listview مع بعض المتطلبات الخاصة - الماجيك مسعد - 16-05-20
السلام عليكم
رمضان كريم عليكم جميعا
عندي ليست فيو فيها 3 Column
وملف نصي فيه
str,str1
عايز اضيفهم للليست فيو ولكن في حالة كان الملف النصي فيه
str,str1,str2
يبقا
Column1 = str
Column2 = str1
Column3 = str2
ولو الملف النصي فيه
str,str1
يبقا الليست
Column1 = str
Column2 = str1
Column3 = "."
اتمني اكون قدرت اشرح المطلوب بطريقة كافية
RE: ازاي اضيف ملف نصي الي listview مع بعض المتطلبات الخاصة - اسامه الهرماوي - 16-05-20
وعليكم السلام...
-صراحة لم أتعامل مع هذه الأداة من قبل فقمت بعملها بال DataGridView
تفضل:
#ورمضان_كريم.
RE: ازاي اضيف ملف نصي الي listview مع بعض المتطلبات الخاصة - الماجيك مسعد - 16-05-20
(16-05-20, 04:07 AM)اسامه الهرماوي كتب : وعليكم السلام...
-صراحة لم أتعامل مع هذه الأداة من قبل فقمت بعملها بال DataGridView
تفضل:
#ورمضان_كريم.
السلام عليكم استاذ اسامة
اشكرك جزيلا
للاسف تقريبا انت مفهمتش الي انا اقصده او انا معرفتش اشرح المطلوب كويس
عموما دا كود انا عامل فيه المطلوب بس بشروط if
وانا كنت ابحث عن طريقة اخري لافضل اداء برمجي ايضا بالابتعاد عن حلقات for
PHP كود :
For Each text As String In File.ReadAllLines(openFileDialog.FileName, Encoding.UTF8)
Dim array2 As String() = text.Split(New Char() {","c})
Dim flag2 As Boolean = array2.Length = 0
If Not flag2 Then
Dim flag3 As Boolean = String.IsNullOrWhiteSpace(array2(0))
If Not flag3 Then
If array2.Length = 3 Then
If LV.Columns.Count = 3 Then
LV.Items.Add(New ListViewItem({array2(0), array2(1), array2(2)}))
Else
LV.Items.Add(New ListViewItem({array2(0), array2(1)}))
End If
ElseIf array2.Length = 2 Then
If LV.Columns.Count = 2 Then
LV.Items.Add(New ListViewItem({array2(0), array2(1)}))
Else
LV.Items.Add(New ListViewItem({array2(0)}))
End If
Else
If LV.Columns.Count = 3 Then
LV.Items.Add(New ListViewItem({array2(0), "NONAME", ""}))
End If
If LV.Columns.Count = 2 Then
LV.Items.Add(New ListViewItem({array2(0), "NONAME"}))
End If
If LV.Columns.Count = 1 Then
LV.Items.Add(New ListViewItem({array2(0)}))
End If
End If
End If
End If
Next