كيفية حفظ الItems من ListBox إلى ملف نصي .txt

 Using SW As New IO.StreamWriter("C:\txt.txt, True)
     For Each itm As String In Me.ListBox1.Items
         SW.WriteLine(itm)
     Next
 End Using

مشكور و ما تقصر

الحمد لله الكود ضبط معاي

طلب ثاني صغير إذا ما عليك كلافة ممكن تشرح لي التركيب Using وأكون لك من الشاكرين أو تدلني على موضوع يشرحه لأنه جديد علي وشكرا

Ab0o0d كتب:

مشكور و ما تقصر

الحمد لله الكود ضبط معاي

طلب ثاني صغير إذا ما عليك كلافة ممكن تشرح لي التركيب Using وأكون لك من الشاكرين أو تدلني على موضوع يشرحه لأنه جديد علي وشكرا

مرحباً أخي الكريم

تستخدم ( Using ) مع الكائنات التي تتضمن الإجراء ( Dispose ) والذي يقوم بتحرير الكائن من الذاكرة

على سبيل المثال الـ( Stream ) يتضمن الفئة ( IDisposable ) وبالتالي فالإجراء ( Dispose ) مدعوم :

Dim STWriter As New IO.StreamWriter("C:\txt.txt", True)
' Use it
' Dispose it
STWriter.Dispose()

لاختصاراستخدام الكلمة ( Dim ) لتصريح المتغير ضمن دالة ولاختصار استدعاء الإجراء ( Dispose ) نستخدم جملة ( Using ) والتي تساعدنا أيضاً في تعين حدود استخدام الكائن التابع :

Using STWriter As New IO.StreamWriter("C:txt.txt", True")
' Use it'
End Using

بالتوفيق :)

كل عام وأنت بخير :)

جزاك الله خيرا يا أخ بشارشرح وافي كفيت ووفيت أسعدك الله ووالديك في الدنيا والآخرةالحمد لله قاربت على انهاء البرنامج و الفضل لله ثم لكم جزاكم الله خيرا