منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم الكود التالي يعمل كل 27 يوم من كل شهر
اريده ان يعمل كل سنة مرة كيف يتم ذلك !
مع جزيل الشكر


Dim dayToEnable As Integer = 27      '27th of every month
        Button2.Enabled = False
        Label2.Text = dayToEnable
        If DateTime.Today.Day = dayToEnable Then
            Button2.Enabled = True
        End If

(27-02-21, 04:57 PM)alim54 كتب : [ -> ]السلام عليكم الكود التالي يعمل كل 27 يوم من كل شهر
اريده ان يعمل كل سنة مرة كيف يتم ذلك !
مع جزيل الشكر


Dim dayToEnable As Integer = 27      '27th of every month
        Button2.Enabled = False
        Label2.Text = dayToEnable
        If DateTime.Today.Day = dayToEnable Then
            Button2.Enabled = True
        End If

يعمل كل سنة مرة في 27 يناير

جزيل الشكر اخي الله يوفقك نحلت المشكلة