[محمود اكرم]

السلام عليكم
الموضوع مأخوذ من الأخ سعود مشكورا في المنتدى القديم
تبقى فكرة كيف ترجع الازرار الى ما كانت عليه هذا يبقى عليك
اذهب الى My Project كما في الصورة
   
وتعديل ما يلزم
   
هذا هو الكود

PHP كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        My.Settings.myval += 1
        My.Settings.Save()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Val(My.Settings.myval) >= 10 Then
            'الهدف المطلوب بعد 10 ازرار
            'على سبيل المثال عدد الضغطات
            MsgBox("البرنامج مجاني")
            'الغاء التحكم بصناديق النص
            TextBox1.Enabled = False
            TextBox2.Enabled = False
            TextBox3.Enabled = False
        Else
            TextBox1.Enabled = True
            TextBox2.Enabled = True
            TextBox3.Enabled = True
        End If

    End Sub 


ملاحظة
على افتراض ان الزر عند الضغط عليه يتم احتساب عدد الضغطات حتى ولو كانت بعد اغلاق البرنامج
يعني مثلا لو ضغطت 9 مرات في التشغيلة الاولى وفي المرة الثانية شغلت البرنامج فعند الضعط سيتم تثبيط عمل صناديق النص الثلاث