[elgokr]

(29-05-18, 07:42 PM)anoname كتب : و الله شكرا و اعلم انك لا تريد الا ان استفيد من الدرس و لكن ربما ساوضح لك الان
لدي فورم 1 فقط و لدي label1.text = 12 و اريد من البرنامج ان كلما يزداد يوم تزداد قيمة label1 بالعدد 1
فتصبح label1.text = 13 و ذلك حسب مرور كم من يوم و ارجوا ان خفيفا عليك لانني اكثرت عليك و نحن
صائمين

---

اليوم هو اليوم 12 من رمضان و غدا سيكون اليوم 13 من رمضان و العملية مستمرة .
اذا 12 هي label1 و الغد هو day + 1 فصارت label1 الى 13

الشكر لله

لا عليك اخى الحبيب
فكل هدفى ان تستفاد 
وليس النسخ واللصق فقط

خلينى انا ابسط عليك الفكرة وما تحتاجه لعمل ذلك

فى البداية ستحتاج الى مثلاً مصدر 
ليكون قيمته تاريخ ثابت او بداية العد وليكن 1 رمضان

من ثم عمل مصدر
وهنا يكون وظيفته عرض تاريخ اليوم

من ثم عمل عملية طرق لعدد الايام (الكود كا تشبيه)

كود :

label1.text = textbox2.text - textbox1.text

سيتم توضيح ذلك بالنهاية لعملية الطرح للايام

فاصبح هنا لدينا الشكل النهائي

واللى من المفترض يكتب 14 بناءاً على تاريخ الكمبيوتر

ناتى الان الى الكود

كود :

Dim firstDate As New DateTime(1439, 9, 1)
       Dim secondDate As New DateTime(Now.ToString("yyyy"), Now.ToString("MM"), Now.ToString("dd"))
       TextBox1.Text = Now.ToString("yyyy-MM-dd")
       Dim TotalDay As String = (secondDate - firstDate).TotalDays.ToString()
       label1.text = CInt(TotalDay) + 1

تذكر اذا كان التاريخ بالجهاز هو التاريخ الميلادى

فقم بتعديل الارقام 1 / 9 / 1439 الى 1 / 5 / 2018 

(اى تاريخ لكن عليك باخذ اعتبار تاريخ الجهاز م / هـ)

تحياتى لك

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