[azizos]

هناك طريقة جد فعالة لكن تتبع معي التالي :


اضف هداه المكتبات اعلى الصفحة :

كود :

Imports Microsoft.VisualBasic

ّ

اضف هدا الحدث الجديد الى الكود :

كود :

Public Sub IDLE(ByVal sender As System.Object, ByVal e As System.EventArgs)
'هنا يمكنك وضع شرط المقارنة مقرون بحالة الزر
me.button.enbaled =date1>date2
'في حالة كان التاريخ الاول اكبر من التاريخ الثاني مباشرة الزر يسمح بالضغط عليه و الا فلا يمكنك الضغط على الزر
End Sub

في الفورم لود ضع هدا الكود :

كود :

'قم بالاتصال بالقاعدة و احفض قيمة التاريخ في متغيير من نوع نص
AddHandler Application.Idle, AddressOf IDLE

الكود شوية معقد لكن احسن طريقة .