(05-06-22, 02:49 AM)نيمو كتب : لم افهم بالضبط عمل الكود هذا ولم يكنب في التكست بوكس التاريخ
اعتقد مش تكست بوكس ؟ المهم كتبت هذا لاسطر وتم زيادة شهر وسبعة ايام
مع هذا ننتظر حد يفهم اكثر الشغلة

كود :

           Dim r As Date = Date.Now.ToShortDateString
           txt_date.Text = r
           txt_date.Text = (r.AddMonths(1).AddDays(7))

(09-06-22, 09:03 AM)نيمو كتب : السلام عليكم
في مشكلة بالرسائل لم استطع رد الرسالة لك وقمت بالرد هنا وانحذف البارحه
المهم

كود :

     Dim r As Date = Date.Now.ToShortDateString
           
           txt_date.Text = (r.AddDays(7))

او
           

كود :

txt_date.Text = (r.AddDays(val(textbox1.text)))

بدل الرقم تحط التكست بوكس وفي التكست تحط الرقم اللي تريده
اذا ما ظبط ارسل المشروع لو امكن

(10-06-22, 08:50 PM)أبووسم كتب :

(09-06-22, 09:03 AM)نيمو كتب : السلام عليكم
في مشكلة بالرسائل لم استطع رد الرسالة لك وقمت بالرد هنا وانحذف البارحه
المهم

كود :

     Dim r As Date = Date.Now.ToShortDateString
           

اشكرك الحل تمام            txt_date.Text = (r.AddDays(7))

او
           

كود :

txt_date.Text = (r.AddDays(val(textbox1.text)))

بدل الرقم تحط التكست بوكس وفي التكست تحط الرقم اللي تريده
اذا ما ظبط ارسل المشروع لو امكن

الف شكر على الرد
و أعتذر على تأخري في الرد بسبب انشغالي في الايام الماضية

جزاك الله خير و بارك في علمك