08-02-17, 02:13 AM
(08-02-17, 01:47 AM)عمر سالم كتب :اخي العزيز عمر(08-02-17, 12:20 AM)السيد الغالي كتب :اسف اخي السيد اقصد 01/01/2018 فانه لايعمل(07-02-17, 10:07 PM)عمر سالم كتب : وعليكم السلام استاذنا السيد اغالي
الكود يعمل في حال غير بداية الرقم في تاريخ
مثال
اذا تاريخ الموجود 07/01/2015
اذا قمت بتغير 09/01/2015 يشتغل
ولكن اذا قمت بتغير الي 01/01/2017
هنا المشكلة لا يعمل
يعني اذا غيرت الشهر او السنه لا يتغير
اخي العزيز عمر سالم السلام عليكم
بطبيعة الحال لا يتغير لان التاريخ (01/01/2017 ) اصغر من تاريخ اليوم لان الشرط يكون text1=0 في حال كان تاريخ اليوم اصغر
(08-02-17, 12:06 AM)sendbad100 كتب : السلام عليكممرحبا سند نفس المشكلة يتغير dd ولكن الشهر وسنه فلا يتاثر بذلك
جرب الكود التالي
والله الموفقكود :
If Format(DTPicker1, "dd/MM/yyyy") > Format(Date, "dd/MM/yyyy") Then
Text1 = 0
Else
Text1 = 1
End If
الكود يتغير مره واحده فقط في حال قمت بتغير مره تانية لا يستجيب
ربما هناك التباس في فهم سؤالك يرجى ارفاق صورة لما يحدث عندك . رغم انه يعمل عندي بشكل طبيعي كما في الصورة المرفقه
تحيــــــــــــــــــــــــــــاتي لكـــــــــــــــــــم
