تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] حفظ النص المكتوب داخل listBox
#1
السلام عليكم ورحمة الله

لو سمحتم طلبي هو كود حفظ النص المكتوب داخل listBOX 
جربت كود حفظ من TextBox عم يحفظ بس المستند يطلع فارغ
ارجوا منكم مساعدتي
وشكرا 
الرد }}}
تم الشكر بواسطة:
#2
تفضل اخي الكريم

ListBox1.Items.Add(TextBox2.Text)
الرد }}}
تم الشكر بواسطة:
#3
(14-11-16, 11:37 PM)dark1459 كتب : تفضل اخي الكريم

ListBox1.Items.Add(TextBox2.Text)

مشكور اخي ولكن ليس هذا ماطلبت 
طلبي هو حفظ النص منListBox الى مستند نصي 
الرد }}}
تم الشكر بواسطة:
#4
ممكون تشوف الرابط
http://stackoverflow.com/questions/27322...opening-it
الرد }}}
تم الشكر بواسطة: ابو ليلى , LoveVb
#5
تفضل اخي الكريم :

Dim x As Long
For x = 0 To ListBox1.Items.Count - 1

TextBox2.Text = ListBox1.Items(x).ToString


Next

وهكذا عندما تريد اضافة اكثر من text
الرد }}}
تم الشكر بواسطة: ابو ليلى , ابو ليلى , LoveVb , alsouf
#6
كما اشار لك الاخ سعود 
PHP كود :
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Dim SaveFD 
As New SaveFileDialog()
 
       SaveFD.Filter "TXT Files (*.txt*)|*.txt"
 
       If SaveFD.ShowDialog() = DialogResult.OK Then
            Dim sb 
As New System.Text.StringBuilder()

 
           For Each o As Object In ListBox1.Items
                sb
.AppendLine(o)
 
           Next

            System
.IO.File.WriteAllText(SaveFD.FileNamesb.ToString())
 
       End If
 
   End Sub 
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
الرد }}}
تم الشكر بواسطة: LoveVb , ابو روضة , ابو روضة
#7
(14-11-16, 11:55 PM)سعود كتب : ممكون تشوف الرابط
http://stackoverflow.com/questions/27322...opening-it

بارك الله فيك اخي الكود الي في الرابط ينقصو امتداد txt وقد قمت بالتعديل عليه وتم بنجاح
جزاك الله عني خيرا 

وهذا الكود لكي يستفيد منه غيري
كود :
   Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
       Dim dz As New SaveFileDialog
       dz.Filter = "TEXT File|*.txt"
       dz.FileName = "new list.txt"
       If dz.ShowDialog() = DialogResult.OK Then
           Using Writer = New StreamWriter(dz.FileName)
               For Each o As Object In ListBox1.Items
                   Writer.WriteLine(o)
               Next
           End Using

       End If
   End Sub

(15-11-16, 12:19 AM)ابو ليلى كتب : كما اشار لك الاخ سعود 
PHP كود :
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Dim SaveFD 
As New SaveFileDialog()
 
       SaveFD.Filter "TXT Files (*.txt*)|*.txt"
 
       If SaveFD.ShowDialog() = DialogResult.OK Then
            Dim sb 
As New System.Text.StringBuilder()

 
           For Each o As Object In ListBox1.Items
                sb
.AppendLine(o)
 
           Next

            System
.IO.File.WriteAllText(SaveFD.FileNamesb.ToString())
 
       End If
 
   End Sub 

مشكور اخي ابو ليلى بارك الله فيك وجزاك الله خير
الرد }}}
تم الشكر بواسطة: ابو ليلى , رضوان الجماعي
#8
كود اخر

كود :
Io.File.writealltext("c:\a.txt",string.join(vbnewline,listbox1.items.cast(of string).toarray))
الْلَّهُم صَلِّ وَسَلِم وَبَارِك عَلَى سَيِّدِنَا مُحَمَّد
الرد }}}
تم الشكر بواسطة: ابو ليلى , ابو روضة


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  بحث بالكومبو بوكس لا ى جزء من النص Lathe1 3 441 28-02-24, 02:59 AM
آخر رد: معاند الحظ
  [سؤال] كيفية انشاء فورم داخل مشروعى عاصم النجار 2 305 05-01-24, 12:36 AM
آخر رد: HALIM ELEULMA
  حماية عمود داخل ورقة الاكسل العيدروس 3 190 05-01-24, 12:21 AM
آخر رد: HALIM ELEULMA
  [VB.NET] استخلاص جزء محدد من نص وإضافته إلى بداية النص ؟ AmeenRashed 2 213 02-01-24, 10:06 AM
آخر رد: AmeenRashed
  [VB.NET] listbox تلوين عدد من هذه الأسماء mervandz 3 420 18-11-23, 01:35 AM
آخر رد: sniper2030
Information [VB.NET] حذف كل العناصر التي تاتي بعد عنصر الذي احدده listbox mervandz 3 288 10-11-23, 07:12 PM
آخر رد: justforit
  هل الداتا قراد فيو تسمح بتعدد الاسطر داخل الخلية عند جلب بيانات نصية طويله من قاعدة ب khalidalwdi 3 461 10-11-23, 11:08 AM
آخر رد: khalidalwdi
  يوجد مشكلة عند تحميل البيانات فى كمبوبوكس داخل داتا جريد new_programer 2 473 17-10-23, 06:51 PM
آخر رد: new_programer
  دالة ادخال ارقام فقط في مربع النص atefkhalf2004 7 809 20-08-23, 09:04 AM
آخر رد: atefkhalf2004
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 350 05-08-23, 02:29 PM
آخر رد: moh61

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


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