منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
القراءة من ملف txt واضافته في Listview والتحقق على عدم تكرار نفس Items - نسخة قابلة للطباعة

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



القراءة من ملف txt واضافته في Listview والتحقق على عدم تكرار نفس Items - Mr.ILI - 22-11-13

السلام عليكم اخواني .... لدي كود يقوم بقراءة ملف تكست ويقوم باضافة كل سطر فيه في LISTview1

ولكن مشكلتي هي اني لا اريد تكرار Items اي مثلا اذا كان يوجد في ملف txt كلمة محمد مكررة ... اريده فقط ان يطبعها مرة واحدة في listview1 .... اليكم الكود للتوضيح اكثر :

PHP كود :
Dim lines() As String IO.File.ReadAllLines("C:\file.txt")
        For 
Each line As String In lines




            
If ListBox1.Items.Contains(linesThen


            
Else

                
ListBox1.Items.Add(line)
                
ListView1.Items.Add(line)


            
End If

        
Next


    End Sub 



RE: القراءة من ملف txt واضافته في Listview والتحقق على عدم تكرار نفس Items - 3booody - 22-11-13

كود :
For Each st As String In IO.File.ReadAllLines("C:\file.txt")
            If ListView1.Items.Count = 0 Then
                ListView1.Items.Add(st)
            Else
                Dim lst2 As ListViewItem = ListView1.FindItemWithText(st)
                If lst2 Is Nothing Then
                    ListView1.Items.Add(st)
                End If
            End If
        Next