[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته




نذهب الى خصائص المشروع عن طريق النقر مرتين على My Project في نافذة مستعرض المشروع في اليمين
أو من القائمة Project نختار Properties آخر خيار
ثم نحدد التبويب Settings في اليسار
نكتب في Name اسم المتغير وليكن itms
نحدد في Type الخيار System.Collections.ArrayList


فان لم نجدها نختار ...Browse في الأخير، ثم نوسع System.Collections ونختار منها ArrayList


ثم نضع هذا الكود لحفظ واسترجاع عناصر ListBox1

PHP كود :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If My.Settings.itms IsNot Nothing Then
        Me.ListBox1.Items.AddRange(My.Settings.itms.ToArray())
    End If

End Sub

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    My.Settings.itms = New ArrayList(ListBox1.Items)
    My.Settings.Save()

End Sub 


[COLOR="#FF0000"]تم تصحيح إلى System.Collections



[/COLOR]
السلام عليكم ورحمة الله وبركاته