kslawy كتب :بسم الله الرحمن الرحيم

حدد علي أداة الـ comboBox بالماوس ثم اذهب إلي أو خاصية من خصائصها وهي خاصية ApplicationSettings تجد بجانبها علامة (+) اضغط عليها ستظهر خاصية أخرى اسمها PropertyBinding اضغط عليها بالماوس سيظهر أمامها زر به ثلاثة نقاط (...) اضغط عليه سيظهر مربع حوار توجد به خصائص الأداة ابحث فيها عن الخاصية Text افتراضيا تكون قيمتها (none) اضغط عليها ستظهر قائمة اضغط منها علي ...New سيظهر مربع حوار آخر عدل فيه فقط الخاصية Name اكتب بها مثلا MyVal هذه الخاصية ستحفظ حالة الـ Text تبع أداة الـ comboBox .

لإسناد قيمة المتغير MyVal لأداتنا في حدث الـ FormLoad نضع :

كود :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
           Me.ComboBox1.Text = My.Settings.myval
    End Sub

عند إغلاق البرنامج نسند قيمة أداتنا للمتغير MyVal وذلك في حدث الـ FormClosing :

كود :

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        My.Settings.Myval = Me.ComboBox1.Text
        My.Settings.Save()
    End Sub

هذا هو المطلوب أليس كذلك ؟

****
***
**
*

kslawy كتب :السلام عليكم ورحمة الله أخي
أكتشفت حاجة رائعة ألا وهو أنك لن تحتاج للأكواد التي وضعتها لك سابقاً ....... كيف ؟
بعد أن نعمل الخطوات السابقة لإنشاء المتغير MyVal ستقوم الأداة تلقائياً بحفظ القيمة المختارة عند إغلاق النموذج دون الحاجة لاستخدام الكود الثاني في حدث الـ FormClosing
كذلك عند فتح النموذج مرة أخرى ستجد أن القيمة التي اخترتها عند إغلاق الفورم قد تم اختيارها تلقائياً لذلك لا نحتاج أيضاً للكود في حدث الـ FormLoad .

****
***
**
*