[elgokr]

بما ان الامر بهذا الشكل

فقد يكون المشكلة فى صيغة التاريخ بالجهاز أو كما اشرت انت اليه بسبب الاكواد

فبدلاً من المسح والاختبار بسبب مشكلة الكود

فيكفي ان تستخدم الكود فى Timer  بهذا الشكل

كود :

       'Gregorian Date
       Dim enSU As System.Globalization.CultureInfo = New System.Globalization.CultureInfo("en-SU")
       enSU.DateTimeFormat.Calendar = New System.Globalization.GregorianCalendar
       Dim DateEn = Date.ParseExact(CDate(TextBox2.Text), "dd/MM/yyyy", enSU)
       Dim GetCountDown As String() = CountDown(Date.Now, DateEn)
       With TextBox1
           .Text = "متبقى "
           .Text += GetCountDown(0) & " عام و "
           .Text += GetCountDown(1) & " شهر و "
           .Text += GetCountDown(2) & " يوم و "
           .Text += GetCountDown(3) & " ساعة و "
           .Text += GetCountDown(4) & " دقيقة و "
           .Text += GetCountDown(5) & " ثانية"
       End With

فبهاذا الكود سيتم معالجت كل ما تحدث انت عليه

حيث اى كان التاريخ المدخل فى TextBox2 غير Gregorian

سيتم تحويله بانه تاريخ اجنبي ليكون Gregorian

ولتختبر نقطة مهمة

تعال عند Function الخاص بـ Get_Value_Date_From_My_Table

واضف التالى وليكن قبل الـ  Return Myreturnvalue

كود :

MsgBox(TextBox2.Text)

نقطة اخيرة ومهمة جداً

انت هنا تقوم بعمل التالى

PHP كود :

SELECT * FROM TBL_GENERALE 


وكذلك

كود :

           Using Dreader = Comme.ExecuteReader()
               If Dreader.HasRows Then
                   Do While Dreader.Read
                       TextBox2.Text = Dreader.Item("GENERALE_Date").ToString()
                   Loop
               End If
           End Using

انت متخيل ماذا يحدث هنا بهذا الكود

انت بتقوم بجلب كل ما فى الجدول

ثم تقوم بتمرير سطر سطر الى TextBox2

ليعتمد بالنهاية ان TextBox2 يحصل على قيمة السطر الاخير

خلال تلك العملية لو استغرق اكثر من ثانية

بطبيعة الحال سيحدث مشكلة فى Timer

كونه غير قادر على فهم او حصوله على قيمة من TextBox2

ليتم اخذها كونها التاريخ ولهذا تحدث معك مشكلة الرسالة

من الصح ان يتم جلب قيمة واحدة فقط

او انك ترحل كل القيم التى تحتوى على تواريخ اكبر من الحالى

ثم تمرير الاستعلام الى ListBox

ومن خلال ListBox تقوم بجلب اقرب تاريخ للتاريخ الحالى

ويتم استخدامه كا قيمة TextBox2

بكده الـ Timer سيعمل على التنبيه للموعد الاقرب 

وبعد الانتهاء او تجاوز التاريخ الحالى لهذا التاريخ

يتم حذف هذا التاريخ من ListBox أو يتم عمل استعلام من جديد

ويتم عمل ما سبق حتى ياتى باقرب تاريخ مع التاريخ الحالى

بكده انت بتقوم بترتيب المواعيد كما لو انه منبه

اتمنى ما اقصده وصل لك

وتكون عرفت المشكلة الحقيقية التى تسبب تلك المشكلة

وكيفية معالجتها بعد شرحى هذا 

تحياتى لك

وتمنياتى لك التوفيق