18-08-21, 05:32 PM
وعليكم السلام
طبعا يتم التعديل على الكود حسب طبيعة البرنامج لديك
كود :
Dim b As Date = "10/10/2021"
Dim d As Double = ((Now - b).Days)
If d >= 30 Then
MsgBox("aaa")
End Ifطبعا يتم التعديل على الكود حسب طبيعة البرنامج لديك
تطبيق للجوال يشبه تطبيق حراج
سورس كود برنامج محاسبة ومبيعات احترافي
سورس كود تطبيق ارسال رصيد من الجوال B4A
سورس كود تطبيق مبيعات للجوال
تيليجرام Abo_anas_kahwaji@
واتساب 00963951283515