تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في combobox وارجوا الحل بعد الله
#1
السلام عليكم .......
شباب عندي مشكلة عندما اضيف عنصر الى combobox عن طريق button فانه يضاف الى combobox وعند ايقاف تنفيذ البرنامج واعادة تشغلية لا يوجد العنصر المضاف مسبقا علما ان البرنامج في الفجوال 2008
الرد }}}}
تم الشكر بواسطة:
#2
بتنضاف العناصر عن طريق الخاصية items الخاصة بالكومبو بوكس
أو بطريقة أخرى من خلال الكود
combobox1.items.add()
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته
للعـــــــلم :
لحـــــــفظ أي قيمة مهما كانت تحتاج الى وسيط للحفظ ,, بمعنى : (حقل في جدول ,,, ملف نصي,,, متغير في الرجستري,,, متغير في My.Settings)


Abu Ehab : Microsoft Partner  & Systems Developer
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم : شكرا على الردود الرد الاول من الاخ صحيح اني استعمل هذا الكود ولكن لا يخزن بشكل دائمي
الرد }}}}
تم الشكر بواسطة:
#5
اضف ضبط جديد من نوع string collection وعند حدث اغلاق البرنامج احفظ محتويات الكمبوبوكس وعند حدث التحميل حمل البيانات المخزنة في my.settings الى الكومبوبوكس
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#6
حل بسيط لكنه سيقوم بحفظ البيانات ف ملف خارج البرنامج

كود :
Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        Dim sw As New IO.StreamWriter(My.Application.Info.DirectoryPath & "\القائمة", False, System.Text.Encoding.UTF8)
        Dim s As String = ""
        For i As Integer = 0 To ComboBox1.Items.Count - 1
            s += ComboBox1.Items.Item(i) & vbCrLf
        Next
        sw.Write(s)
        sw.Close()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            Dim objReader As New System.IO.StreamReader(My.Application.Info.DirectoryPath & "\القائمة")
            Dim g As String = objReader.ReadToEnd
            g = Replace(g, vbCrLf, "#")
            Dim rt() As String = g.Split("#")
            For i As Integer = 0 To rt.Length - 1
                ComboBox1.Items.Add(rt(i))
            Next
        Catch ex As Exception
            MsgBox("الملف غير موجود")
        End Try
      
    End Sub
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في اجبار المستخدم ان يحفظ صورة في قاعدة بيانات shado1796 96 6,176 منذ 25 دقيقة مضت
آخر رد: khodor1985
  [VB.NET] مشكلة المسارات Fantastico 1 44 أمس, 12:40 PM
آخر رد: Master Hacker
  مشكلة ف الحفظ والتعديل بعد تحويل المشروع لملف تنفيذي apo yousef 3 87 23-02-17, 12:28 PM
آخر رد: ssayed111
  مشكلة في عرض النص بالعربي في #Region فقط ali.alfoly 1 74 22-02-17, 02:50 AM
آخر رد: مساعدة
  ار جو المساعدة ما هي مشكلة كود التعديل والحذف boofa2015 2 56 21-02-17, 10:58 AM
آخر رد: boofa2015
  [VB.NET] مشكلة في كيفية اعادة الاتصال في TcpClient YazanOtoum 1 59 20-02-17, 01:03 PM
آخر رد: YazanOtoum
  [VB.NET] كيفية حل مشكلة Global.[String] فى ملف Settings.Designer.vb الماجيك مسعد 2 60 20-02-17, 03:08 AM
آخر رد: الماجيك مسعد
  [VB.NET] مشكلة في حدف صورة من مسار بمجلد بالكمبيوتر ناصر شير 6 117 18-02-17, 02:37 PM
آخر رد: ناصر شير
  [سؤال] حل مشكلة برنامج لتغير التاريخ عبدالرحمن المكاوي 6 144 17-02-17, 11:19 PM
آخر رد: EnormousSoft
  [VB.NET] مشكلة نقل الكود من Form2 الي Form1 3asfa~mdmra 2 80 17-02-17, 02:44 AM
آخر رد: الماجيك مسعد

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


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