13-03-15, 02:29 AM
هذه اكوادي التي استخدمها للتعامل مع التاريخ
كود تحويل التاريخ
Dim dat_st As Date = Date.ParseExact(Date_start.Text, "dd/MM/yyyy", Nothing)
اضافة ايام او شهور او سنوات الى تاريخ
Date_end.Text = DateSerial((Now.Year), (Now.Month), (Now.Day) + 7)
بالتوفيق
كود تحويل التاريخ
Dim dat_st As Date = Date.ParseExact(Date_start.Text, "dd/MM/yyyy", Nothing)
اضافة ايام او شهور او سنوات الى تاريخ
Date_end.Text = DateSerial((Now.Year), (Now.Month), (Now.Day) + 7)
بالتوفيق