الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

هذا كود لحفظ الـ listbox الى txt اريد به تعديل بسيط

بدأه جواد في 8 مارس 2013 · 2 رد · 527 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم اخواني

 

هذا كود لحفظ الـ listbox الى txt اريد به تعديل بسيط

 

Dim i

CommonDialog1.Filter = "txt|*.txt"
CommonDialog1.ShowSave
Open CommonDialog1.Filename For Append As #1
Write #1,
For i = 0 To List1.ListCount - 1
Write #1, List1.List(i)
Next i
Close #1

 

 

 

ولكن مشكلته انه يضيف مع الاسم علامة "  "

 

يعني مثلا لو عملت حفظ لقائمة فيها اسماء

 

يطلع بالشكل هذا

 

"احمد"

"خالد"

 

وهكذا

 

فكيف نزيل هذه العلامة

ولكم جزيل الشكر

#2

السلام عليكم...

 

هذا بسبب سلوك الأمر Write. استعمل الأمر Print بدلاً منه.

 

نرجو الاستفادة و السلام.

2

وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ

صدق الله العظيم

#3

الله يجزاك الخير اخي najy_zl

 

شكراً لك

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…