تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة التكرار فى ملف txt
#1
اريد حفظ log فى ملف تكست ال log موجوده فى listbox استخدم هذا الكود لل حفظ
كود :
              Using sw As StreamWriter = File.AppendText(Path)
                   For Each item In ListBox1.Items
                       sw.WriteLine("Start Log.")
                       sw.WriteLine(Date.Now)
                       sw.WriteLine("[" + item + "]")
                       sw.WriteLine("End Log.")
                   Next
               End Using

يظهر هذا الناتج

إقتباس :Start Log.
6/29/2016 11:56:28 PM
[0]
End Log.
Start Log.
6/29/2016 11:56:28 PM
[1]
End Log.
Start Log.
6/29/2016 11:56:28 PM
[2]
End Log.
اريد الناتج يكون هكذا

إقتباس :Start Log.
6/29/2016 11:56:28 PM
[0]
[1]
[2]
End Log.

تم الحل بحمد الله
For intIdx As Int32 = 0 To Me.ListBox1.Items.Count - 1
sItems = (Me.ListBox1.Items.Item(intIdx))
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم