بسم الله الرحمن الرحيم
هل هناك دالة تعطي آخر يوم في الشهر لتاريخ معين أي أعطيها تاريخ فتعطيني تاريخ آخر يوم في الشهر
دالة تعطي آخر يوم في الشهر
السلام عليكم ورحمه الله وبركاته
اخي جرب الكود ده
DateSerial(Year(Now.Date), Month(Now.Date) + 1, 0)
.:: Wish to become better and better ::.
Dim dayCount As Integer= DateTime.DaysInMonth(2011,4)
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال